以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]窗体选择性录入 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=90648) |
-- 作者:jyh7081 -- 发布时间:2016/9/19 9:45:00 -- [求助]窗体选择性录入 编辑完成退出时,保留勾选的文本内容,写入相应单元格;没有勾选的文本框对应的单元格值为空。 [此贴子已经被作者于2016/9/19 12:17:03编辑过]
|
-- 作者:有点蓝 -- 发布时间:2016/9/19 10:56:00 -- 保存按钮代码 With Tables("员工") If .Current IsNot Nothing Then If Not e.Form.Controls("CheckBox1").Checked Then .Current("编号") = Nothing If Not e.Form.Controls("CheckBox2").Checked Then .Current("姓名") = Nothing
...... .Current.Save() End If End With |