编辑查询表列 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 编辑查询表列

共有4630人关注过本帖树形打印复制链接主题：编辑查询表列

良才

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：788 积分：6297 威望：0 精华：0 注册：2012/6/11 17:21:00

编辑查询表列 发帖心情

Post By：2019/11/12 11:35:00 [只看该作者]

Tables("窗口1_Table1")类型是SQLTable，想编辑托管状况列，

PrepareEdit

If e.IsFocusCell Then
    If e.Col.Name = "托管状况" Then
        e.Col.Combolist = "事假|病假|无故"
     End If
End If

怎样允许编辑托管状况列，求代码？谢谢！

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：113480 积分：577889 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2019/11/12 11:37:00 [只看该作者]

窗口设计那里把允许编辑设置为true即可

良才

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：788 积分：6297 威望：0 精华：0 注册：2012/6/11 17:21:00

Post By：2019/11/12 11:52:00 [只看该作者]

If e.Sender.Value IsNot Nothing Then
SQL = "Se lect 教工编号,教工姓名 From {教工基本信息}"
e.Form.controls("Table1").Table.Fill("Se lect IIF(Right(学期,1) = '1',Left(学期,4) & '年秋学期',IIF(Right(学期,1) = '2',Left(学期,4)+1 & '年春学期','')) As 学期,b.托管班级,b.学生编号,学生姓名,托管日期,托管状况,c.录入日期,c.录入人 As 教工编号,教工姓名 As 录入人 From (({学生基本信息} a Inner JOIN {托管缴费} b ON a.学生编号 = b.学生编号) LEFT JOIN (Sel ect 学生编号,托管日期,托管状况,录入人,录入日期 From {托管日况} Where 托管日期 = #"& e.Sender.Value &"#) c ON b.学生编号 = c.学生编号) LEFT JOIN (" & SQL & ") h ON c.录入人 = h.教工编号 Where 开始日期 <= #"& e.Sender.Value &"# And 结束日期 >= #"& e.Sender.Value &"# ORDER BY b.托管班级,b.学生编号","Sale", True)
End If

是查询表，要用代码

[此贴子已经被作者于2019/11/12 11:55:22编辑过]