以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]空表问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=160017)

--  作者:fesyj
--  发布时间:2021/1/17 23:14:00
--  [求助]空表问题
如果A表是空的,一行都没有,就不进行任何操作,,不是空表,就执行下面代码
Dim frm As WinForm.Form = Forms("查经")

If frm.Opened AndAlso e.Table.Current IsNot Nothing Then

    frm.Controls("ComboBox2").text = e.Table.Current("卷")

    frm.Controls("ComboBox3").text = e.Table.Current("章")

    frm.Controls("ComboBox4").text = e.Table.Current("从节")

    frm.Controls("ComboBox5").text = e.Table.Current("至节")

End If


请教要怎么编写


--  作者:有点蓝
--  发布时间:2021/1/18 8:35:00
--  
参考:http://www.foxtable.com/webhelp/topics/1438.htm,判断总行数是不是为0