Red de conocimiento informático - Problemas con los teléfonos móviles - vb sentencia de selección

vb sentencia de selección

Private Sub form_Click()

n = InputBox(";")

Seleccione caso n

Caso 2, 4, 6

x = 20

El caso es <10

x = 30

Caso 10

x = 40

Caso 1 a 20

x = 10

Fin de selección

MsgBox (x)

Fin de sub

Pones el Caso 1 A 20

x = 10

al frente. Si el campo cumple, la siguiente declaración no será ejecutada~