viernes, 25 de septiembre de 2009

Agrega a Lista


Private Sub botón_Click()

Text1.SetFocus

List1.AddItem (Text1)

Text1 = ""

End Sub

No hay comentarios:

Publicar un comentario