以文本方式查看主题

-  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
--  [求助]窗体选择性录入

由于列较多,因此,在编辑窗体中的文本框后面加了个复选框。
编辑完成退出时,保留勾选的文本内容,写入相应单元格;没有勾选的文本框对应的单元格值为空。


附件:
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:编辑方式.table




[此贴子已经被作者于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