Red de conocimiento informático - Problemas con los teléfonos móviles - Cómo utilizar el control ComboBox en VB

Cómo utilizar el control ComboBox en VB

Private Sub Combo1_Click()

Atenuar A como entero

Si Combo1.Text = "Grande" Entonces

A = 2

Texto1 .Text = A

ElseIf Combo1.Text = " Small" Then

A = 1

Text1.Text = A

Fin Si

Fin Sub