Usar IF THEN ELSE ENDIF en una misma línea
Truco de Visual Basic 6.0 - Usar IF THEN ELSE ENDIF en una misma línea
Insertar un CommandButton y un TextBox y escribir el siguiente código:
Private Sub Command1_Click()
Dim I As Integer
Dim A As String
I = 3
A = IIf(I <> 1, "True", "False")
Text1.Text = A
End Sub
Más trucos de Trucos de Visual Basic 6.0
Trucos más leídos
Los trucos Trucos de Visual Basic 6.0 más vistos