Consulta también:
- Vb.net case
- Select case visual basic - Mejores respuestas
- Case en visual basic - Mejores respuestas
- Redondear vb net - Guide
- Cómo dar formato de hora a un número decimal en VBA - Guide
- Que es case de computadora - Guide
- Criminal case gratis - Programas - Puzles
- Please select boot device que significa - Foro Hardware
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