7 lines
201 B
Text
7 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
|