Ver Mensaje Individual
  #2 (permalink)  
Antiguo 30/06/2008, 09:27
Avatar de David
David
Moderador
 
Fecha de Ingreso: abril-2005
Ubicación: In this planet
Mensajes: 15.720
Antigüedad: 19 años, 1 mes
Puntos: 839
Respuesta: ayuda con vector

Pues es fácil. Hazlo así:
Código:
Dim Looping As Byte
For Looping = 0 To UBound(personal)
     personal(Looping) = InputBox("Ingresa dato Nº " & Looping, "Agregar")
Next Looping
__________________
Por favor, antes de preguntar, revisa la Guía para realizar preguntas.