Consulta también:
- Switch case vb
- Vb.net case - Mejores respuestas
- Ejercicios de visual basic resueltos - Mejores respuestas
- Smart switch pc - Programas - Gestión de archivos
- Redondear vb net - Guide
- Lesser audio switch - Programas - Personalización
- Emulador de nintendo switch - Guide
- Juegos nintendo switch 2023 - Inicio - Switch
3 respuestas
AHI TE VA UN EJEMPLO, TENGO UTILIZANDO LOS CONTROLES, COMBOBOX, COMMAND Y UN TEXT
Private Sub Command1_Click()
Dim a As String
a = Combo1.Text
Select Case a
Case "LACTEOS"
Text1.Text = 1
Case "FRUTAS"
Text1.Text = 2
Case "VERDURAS"
Text1.Text = 3
Case "BOTANA"
Text1.Text = 4
Case "CARNES"
Text1.Text = 5
Case "ENLATADOS"
Text1.Text = 6
End Select
End Sub
Private Sub Command1_Click()
Dim a As String
a = Combo1.Text
Select Case a
Case "LACTEOS"
Text1.Text = 1
Case "FRUTAS"
Text1.Text = 2
Case "VERDURAS"
Text1.Text = 3
Case "BOTANA"
Text1.Text = 4
Case "CARNES"
Text1.Text = 5
Case "ENLATADOS"
Text1.Text = 6
End Select
End Sub
23 feb 2012 a las 17:23
1 may 2012 a las 23:27