专家坐堂-[求助]判断某行有没有值Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]判断某行有没有值  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=86108)

--  作者：ivyco
--  发布时间：2016/6/11 0:01:00
--  [求助]判断某行有没有值

请问怎么样去判某表中的最后一行是否有值,没有值,则补进行任何操作,如果有值的话,则新增一样.

我用了

If Tables("某表").Current. Is Nothing Then

....

结果么起作用.

求指导.谢谢

--  作者：大红袍
--  发布时间：2016/6/11 0:09:00
--
Dim r As Row = Tables("表A").Current
Dim flag As Boolean = True
For Each c As Col In r.Table.Cols
    If r.IsNull(c.name) = False Then
        flag = False
    End If
Next
If flag Then
    msgbox("当前行,是空行")
End If

--  作者：ivyco
--  发布时间：2016/6/11 0:17:00
--
谢谢