vb

1.  使用 IIF 和 SWITCH 以精减代码
在很多地方你都可以使用一个更紧凑的 Iif 函数来代替 If…Else…Endif 的结构： 例：返回两个值中较大的一个 maxValue = Iif(first >= second, first, second)
Switch 则是一个很少使用的函数，可是在很多方面它都提供比 If…ElseIf 结构更好的 例：判断 "x" 是正、负还是 null?
Print Switch(x<0,"负",x>0,"正", True, "Null")

 

2.   0、""(空字串)、Null、Empty、与 Nothing 的区别
先回答以下问题吧！ 经过以下的叙述之后， 变量 A、B、C、D 分别等于 0、""、Null、 Empty、 Nothing 的哪一个？
Dim A
Dim B As String
Dim C As Integer
Dim D As Object
A 等于 Empty， 因为尚未初始化的「不定型变量」都等于 Empty。但如果检测 A = "" 或 A = 0， 也都可以得到 True 值。
B 等于 ""， 因为尚未初始化的非固定长度「字串」都等于 "" 。 但请注意 B<> Null。
C 等于 0， 这个还有问题吗？
D 等于 Nothing， 尚未设定有物件的「物件变量」都等于 Nothing， 但请不要使用 D = Nothing , 而要使用 D Is Nothing 来判断 D 是否等于 Nothing， 因为判断 是否相等的符号是 Is 不是 = 。
最令人迷惑的地方是 Null 这个保留字， 请看以下语句：
Print X = Null
Print X <> Null
结果都是输出 Null(不是 True 也不是 False)， 这是因为任何一个运算式只要含有 Null ， 则该运算式就等于 Null， 实际上想要判断某一数据是否为 Null 绝对不能使用：
If X = Null Then ' 永远都会得到 Null
而要使用：
If IsNull(X) Then
哪一种数据会等于 Null 呢？ 除了含有 Null 运算式之外， 就属没有输入任何数据的「数据字段」(在数据库中) 会等于 Null。