Visual Basic - NO ME IGNOREN Y AYUDENME PORFA!!!

tengo un programa ke inserta solo 5 numero pero yo kiero ke inserte los ke sean sin ke me ponga un limite como le puedo hacer o ke kondicion puedo usar?

podrías explicar mejor el problema?¿?¿ donde quieres insertar?

si mira es ke tengo un programa que inserta y elimina y modifica, tu vas almacenando numeros y te lo muestra en una lista, entonces lo ke yo tengo es for n= 1 to 5 esa es la condicion ke yo estoy usando, pero me piden ke el usuario ingrese los numero ke el desee y yo puse como limite nada mas 5 no c ke kondicion usar si me puedes ayudar?

pero para que quieres esos numeros? si es solamente para mostrarlos en una lista entones no les pongas limites y en lugar de usar un FOR utiliza haz una funcion que lo inserte cada vez que hay un cambio en el textbox o cada vez que se presione un boton o algo asi

ese es el problema ke no c ke funcion utilizar mira te voy a poner el problema a ver si me puedes ayudar
dim n as integer
dim y as integer
for n = 1 to 5
y=val(inputbox("introduce un valor"))
v(n)=y
list1.additem str(v(n))

ese es el principio y en lo ke tengo el problema no kiero ke se ponga como limite 5 si no ke sea finito el numero como se le hace

Hola!
Para que no tengas límite a la hora de introducir valores, sería mejor que usaras un textbox y programar el evento keypress, para que cuando se pulse la tecla intro (keyascii = 13) se introduzca el valor en la lista.
Podría ser:
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
List1.AddItem Text1.Text
Text1.Text = ""
End If
End Sub
Espero que te sirva de algo! Soy un novato en visual, pero lo he hecho y puedo meter tantos valores como quiera en la lista! Bye!

tal vez podés darle un valor para saber el momento de cortar, por ejemplo "" o "-1" olo q quieras:

dim n as integer
dim y as integer
dim s as string
s =inputbox("introduce un valor")
while s <> ""
y = val(s)
v(n)=y
list1.additem str(v(n))
s =inputbox("introduce un valor")
wend

me aparece otro problema que el arreglo (es v ) dice
dim v (1 to 5) as integer
ahy no le puedo mover por ejemplo en inserta y modifica si me funciona pero al momento de eliminar si modifico v me aparecen tantos ceros como sea el numero ke inserte en v como le hago?

te aparecen ceros donde? en la lista?? por q no los eliminas?

si es visual basic y lo que no te permite introducir mas caracteres en una caja de texto, la caja de texto tiene una propíedad llamada maxlength y ahi sele puedecmabiar la longitud o borrarletodopara que permita ingresar el numero indefinido

me aparecen ceros en la lista de eliminar.....al momento de eliminar me aparecen los ceros osea el numero ke le puse al arreglo por ejemplo dim v(1 to 50) as integer
al momento de eliminar un numero yo introduje 5 y los otros 45 son los ceros ke me aparecen osea ahy no c como hacerle me podrian ayudar

Las soluciones pasarian por una matriz dinámica ó un bucle Do. Te envío un pequeño código que espero te sirva.

Option Explicit
Dim ValoresNumericos() as Integer
Dim Puntero As Double

Private Sub CmdNumero_Click()
Dim NewNumero as Integer

NewNumero=Inputbox("Dame un nuevo Número")
If IsNumeric(NewNumero) Then
Redim Preserve ValoresNumericos(Puntero)
ValoresNumericos(Puntero)=NewNumero
Puntero=Puntero+1
Else
MsgBox "No es numérico"
Exit Sub
End If
End Sub

Espero que sea esto lo que necesitas. Saludos Pola

gracias pola si me sirvio