Ayuda en VB6

[RedMew]

Iniciado por erbuson

Hola, lo de guardar los resultados en un arreglo sigo sin entenderlo, ¿ Porque no pones el código de como estas intentando hacerlo a ver si lo veo mas claro ?

Como no sea algo así ?

Dim Arreglo(5,3) As Long

For x = 1 to 5
Arreglo(x, 1) = x+x
Arreglo(x, 2) = (x-1)*2
Arreglo(x, 3) = (x+3)-(x-2)
Next

En cuanto a lo de editar, tienes razón SOLO se puede editar el último mensaje.

Saludos

Muchas gracias y pues para no complicarlo tanto cada funcion la asigne a un boton distinto, y le puse As Integer, en si me quedo asi
Dim ar(5) As Integer
Private Sub Command1_Click()
For x = 1 To x = 5
ar(x) = x + x
Next
End Sub

Private Sub Command2_Click()
For x = 1 To x = 5
ar(x) = (x) * 2
Next
End Sub

Private Sub Command3_Click()
For x = 1 To x = 5
ar(x) = (x + 3) - (x - 2)
Next
End Sub
y pues ahora los resultados los debo graficar en un picturebox, disculpen x tantas molestias pero tenia mucho que no usaba el visual, recuerdo que era mas o menos asi para obtenerlo

Pic.Line (X1, Y1)-(X2, Y2)

y segun recuerdo los valores de X y Y dependian del tamaño del picturebox y a como le entiendo Y vendria siendo el valor de cada operacion, y pues ya me revolvi en como graficar los valores obtenidos, les agradeceria mucho si me pudieran seguir ayudando, desde ya gracias

Saludos