02/10/2008, 12:32
|
| | | Fecha de Ingreso: septiembre-2008
Mensajes: 11
Antigüedad: 16 años, 7 meses Puntos: 0 | |
| Respuesta: Ayuda en Visual Basic 6
MI ESTO ES LO QUE E ECHO PERO EL PROBLEMA ESTA AL VALIDAR LAS PALABRAS QUIERO QUE SE INGRESEN UNO POR UNO NO LAS 20 DE UNAVES COMO LE PUEDO HACER
Private Sub Command1_Click()
Text1.Text = Format(Text1.Text, ">")
If Text1.Text = Empty Then
MsgBox " No has escrito ningun Nombre"
Text1.SetFocus
Else
For x = 1 To 20
Nombres(x) = Text1.Text
List1.AddItem Nombres(x)
Next
End If
End Sub |