以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- button1按钮不可用,如何写代码 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=132548) |
-- 作者:yfy13338431925 -- 发布时间:2019/3/24 20:30:00 -- button1按钮不可用,如何写代码 甜老师: 窗体关联子表“表A.表B”中"“第一列”列有数据时,窗口的“button1"按钮不可用,如何写代码 |
-- 作者:有点甜 -- 发布时间:2019/3/24 22:52:00 -- 建议在button1的click事件写代码处理,如
If tables("表A.表B").current("第一列") <> nothing then msgbox("不可以用") return End If
\'后面写click原来的代码 |
-- 作者:yfy13338431925 -- 发布时间:2019/3/25 17:35:00 -- 甜老师:
If Tables("表A.表B").Current.IsNull("第一列") = False Then e.Form.Controls("Button1").Enabled = False
如果表为空表,即无数据空行,运行时候报错 如果有空行则不报错 什么情况?? |
-- 作者:有点甜 -- 发布时间:2019/3/25 18:22:00 -- If Tables("表A.表B").Current isnot nothing andalso Tables("表A.表B").Current.IsNull("第一列") = False Then e.Form.Controls("Button1").Enabled = False End If |