Este sitio utiliza cookies propias y de terceros. Si continúa navegando consideramos que acepta el uso de cookies. OK Más Información.

Usar IF THEN ELSE ENDIF en una misma línea

  • 0 Respuestas
  • 1968 Vistas

0 Usuarios y 1 Visitante están viendo este tema.

Conectado ANTRAX

  • *
  • Administrator
  • Mensajes: 5487
  • Actividad:
    23.33%
  • Reputación 35
  • ANTRAX
    • Ver Perfil
    • Underc0de
    • Email
  • Skype: underc0de.org
  • Twitter: @Underc0de
« en: Julio 26, 2010, 10:29:40 am »
Insertar un CommandButton y un TextBox y escribir el siguiente código:

Código: Visual Basic
  1. Private Sub Command1_Click()
  2. Dim I As Integer
  3. Dim A As String
  4. I = 3
  5. A = IIf(I <> 1, "True", "False")
  6. Text1.Text = A
  7. End Sub

Una variante del mismo codigo:

Código: Visual Basic
  1.  Insertar un CommandButton y un TextBox y escribir el siguiente código:
  2.  Private Sub Command1_Click()
  3.  Dim I As Integer
  4.  Dim A As String
  5.  I = 3
  6. If I <> 1 Then A = "True" Else A = "False"
  7.  Text1.Text = A
  8.  End Sub
« Última modificación: Julio 08, 2011, 10:06:06 am por ANTRAX »


 

¿Te gustó el post? COMPARTILO!



Como usar el Random

Iniciado por ANTRAX

Respuestas: 0
Vistas: 1985
Último mensaje Julio 26, 2010, 10:21:12 am
por ANTRAX
Como usar un Array

Iniciado por ANTRAX

Respuestas: 0
Vistas: 2126
Último mensaje Julio 26, 2010, 11:21:35 am
por ANTRAX