Listing 2: Excerpt from IIfSample.vbs

x = IIf(IsNull(TestVar),"TestVar IS Null",IIf(IsEmpty(TestVar),
 "TestVar IS Empty","TestVar is NOT Empty and NOT Null"))
Msgbox "Example # 4 " & x

x = IIf(a=b,IIF(b=c,"All Equal","A and B equal"),IIf(a=c,"A and C Equal",
 IIf(B=C,"B and C equal","A, B & C are all Different")))
Msgbox "Example # 5 " & x