以下是引用t_fs在2008-11-28 9:25:00的发言：
Dim A As New Date
谢谢回复！
Dim b As New Date
A =e.Form.Controls("Datetimepicker1").value
B =e.Form.Controls("Datetimepicker2").value
if e.Form.Controls("Datetimepicker1").value Is Nothing or e.Form.Controls("Datetimepicker2").value Is Nothing then
MessageBox.Show("请 您 正 确 选 择 汇 总 日 期 !","提示")
return
end if
上述为正确代码，若将第四行判断句换成：if A is nothing or B is nothing then
编译时就会出现错误，不知何故？
A和B是日期型，不可能是Nothing.
Nothing
变量可能不包括任何内容，也就是空值。
在Visual Basic中，空值用Nothing表示。
有两个特殊的运算符，用于判断变量的值是不是Nothing，分别是Is和IsNot，前者的意思是“是”，后者的意思是“不是”。
语法为：
变量名 Is Nothing
如果变量值为Nothing，则返回True，否则返回False。
变量名 IsNot Nothing
如果变量值不为Nothing，则返回True，否则返回False。
Dim
str1 As String
Dim Str2 AS String = "FoxTable"
If str1 Is Nothing Then
Output.Show("Str1是空值！")
End If
If str2 IsNot Nothing Then
Output.Show("Str2不是空值！")
End If
需要注意的是，数值、日期、逻辑三种类型的变量，是永远不会为空的，其它任何类型的变量，如果没有明确赋值，其初始值都是Nothing
加好友 
发短信
Post By：2008/11/28 8:57:00 [显示全部帖子]
