以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=55784)
--  作者：riyuan
--  发布时间：2014/8/23 9:09:00
--  [求助]
请教如何判断筛选表中的数据为是否为空，如果为空，执行一个操作，如果不为空，执行另一个操作
--  作者：Bin
--  发布时间：2014/8/23 9:10:00
--  
在不同的地方判断代码稍有不一样,说明具体情况才能帮到你.

在DatacolChangeD 事件中
 if e.datarow.isnull("列名") then

else


end if
--  作者：riyuan
--  发布时间：2014/8/23 9:13:00
--  
在按钮中判断呢
--  作者：riyuan
--  发布时间：2014/8/23 9:14:00
--  
Dim ss As String
ss=Tables("mm_Table1").Current("身份证号")
Dim Result As DialogResult
Dim cmd As New SQLCommand
cmd.C
cmd.CommandText ="delete * From {hkxx} Where 身份证号 = \'" & ss & "\'"

If DataTables("mm_table1").DataRows.Count>0 Then
  MessageBox.Show("无记录")
Else
result = MessageBox.Show("是否修改当前数据?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.Yes Then
Forms("hkb").Open()

End If
End If