8 lines
201 B
Text
8 lines
201 B
Text
|
Imports Microsoft.VisualBasic
|
||
|
|
|
||
|
|
...
|
||
|
|
|
||
|
|
Dim result As String = CType(IIf("pants" = "glasses", "passed", "failed"), String) 'VB 1-8
|
||
|
|
|
||
|
|
Dim result As String = If("pants" = "glasses", "passed", "failed") 'VB 9
|