以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  按钮指令  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=119662)

--  作者:genghiskhan
--  发布时间:2018/5/29 19:02:00
--  按钮指令
窗口上一个按钮的指令,做到如果“第一列”为有内容,则新增加一行,若没有,则该按钮无效
--  作者:有点蓝
--  发布时间:2018/5/29 20:16:00
--  
Dim r As Row = Tables("表A").Current
If r IsNot Nothing AndAlso r.IsNull("第一列") = False Then
    Tables("表A").AddNew
End If