Combo "Lista de Nombres"



Breve Descripción del Programa:

"Escribe cualquier texto en la caja y lo almacena en una lista"

Private Sub add_Click()
Combo1.AddItem UCase(Text1)
End Sub

Private Sub exit_Click()
End
End Sub

Private Sub new_Click()
Text1 = ""
Text1.SetFocus
End Sub

0 Tu opinion =D: