以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请问,这段判断为空值的代码为什么不执行?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=70061)

--  作者:minxizai
--  发布时间:2015/6/15 11:35:00
--  请问,这段判断为空值的代码为什么不执行?
Dim xm As String = Tables("客户资料").Current("姓名")
If xm Is Nothing Then
    MessageBox.Show("姓名必须输入,否则不能保存!", "提示", MessageBoxButtons.ok)
Else Tables("客户资料").Current.save
End If

--  作者:Bin
--  发布时间:2015/6/15 11:36:00
--  
if Tables("客户资料").Current.isnull("姓名") then 
 MessageBox.Show("姓名必须输入,否则不能保存!", "提示", MessageBoxButtons.ok)
Else 
Tables("客户资料").Current.save
End If

--  作者:minxizai
--  发布时间:2015/6/15 11:39:00
--  
谢谢
--  作者:minxizai
--  发布时间:2015/6/15 12:02:00
--  
以下是引用Bin在2015/6/15 11:36:00的发言:
if Tables("客户资料").Current.isnull("姓名") then 
 MessageBox.Show("姓名必须输入,否则不能保存!", "提示", MessageBoxButtons.ok)
Else 
Tables("客户资料").Current.save
End If

为什么不能用if Tables("客户资料").Current("姓名") is nothing then来判断啊


--  作者:大红袍
--  发布时间:2015/6/15 12:08:00
--  

 参考 http://www.foxtable.com/help/topics/1470.htm