Hola a todos, resulta que tengo 3 TextBox y 1 button y necesito que al hacer clic en el boton aparezca cualquier texto en cada uno de los Text Box y luego otra vez hacer click y aparezca nuevos datos.
He intentado hacerlo de esta manera
Cita: Private Type Agenda
nombre As String
apellido As String
telefono As Long
End Type
Dim personas(1 To 3) As Agenda
Private Sub Command1_Click()
personas(1).nombre = "Juan"
personas(1).apellido = "Martines"
personas(1).telefono = 2851452
personas(2).nombre = "Miguel"
personas(2).apellido = "Gonzalez"
personas(2).telefono = 2851452
personas(3).nombre = "Gina"
personas(3).apellido = "Ramires"
personas(3).telefono = 2854544
For x = 1 To 3
Text1 = personas(x).nombre
Text2 = personas(x).apellido
Text3 = personas(x).telefono
Next
End Sub
pero me sale error de variable no definida