Visual Basic - Primera consulta, se agradece la ayuda

Buenas tardes

Es mi primera vez con el visual basic, y mi problema es el siguiente:
Tengo una ecuación (por ejemplo y=2*x+1, u otra cualquiera) y me gustaría obtener una tabla de datos con parejas de la valores (x,y) y una representación gráfica de la misma, en un "Chart". Lo que me gustaría es poder hacer una matriz de dos columnas y muchas filas con las parejas (x,y)

Agradecería que me diesen alguna pista/tutorial para hacerlo

Muchas gracias

Un saludo

Buenos días

Ya pude hacerlo. Si quieren pueden cerrar el hilo

Un saludo

Hola Pablo, nos puedes comentar como lo solucionaste?

Para una tabla de una fila hice algo así (con un formulario con un botón y un DataGridView)

Public Class Form1

Public Sub Rellenar_Tabla1(d As DataGridView)
'Crear una matriz unidimensional
Dim N As Integer = 100
Dim a(N) As Double, i As Integer
For i = 0 To N
a(i) = 2 * i / 10
Next
'Un valor cualquiera para ver que la matriz se ha construido bien
MsgBox(a(50).ToString)

'Rellenamos una tabla DATAGRID. Vamos primero con la tabla de una sola dimensión
d.ColumnCount = 1
d.RowCount = N
d.Columns.Item(0).HeaderCell.Value = "Valores columna 1"

For i = 0 To d.RowCount - 1
d.Rows.Item(i).HeaderCell.Value = (i + 1).ToString
Next
For i = 0 To d.RowCount - 1
d.Item(0, i).Value = a(i)

Next
End Sub

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Rellenar_Tabla1(DataGridView1)
End Sub

End Class

Y con dos columnas (y así haría si hubiese más)

Public Class Form1



Public Sub Rellenar_Tabla2(d As DataGridView)
Dim N As Integer = 100
Dim i As Integer
Dim b(2, N) As Double
Dim j As Integer = 5

'Crear una matriz bidimensional, dos columnas y N filas
For i = 0 To N
b(0, i) = i 'Valores de la primera columna
b(1, i) = 4 * i + 2 * j 'Valores de la segunda columna
Next
'Un valor cualquiera para ver que la matriz se ha construido bien
MsgBox(b(0, 100).ToString)

'Rellenamos una tabla DATAGRID.
d.ColumnCount = 2
d.RowCount = N
d.Columns.Item(0).HeaderCell.Value = "Valores columna 1"
d.Columns.Item(0).HeaderCell.Value = "Valores columna 2"

For i = 0 To d.RowCount - 1
d.Rows.Item(i).HeaderCell.Value = (i + 1).ToString
Next
For i = 0 To d.RowCount - 1
d.Item(0, i).Value = b(0, i)
d.Item(1, i).Value = b(1, i)
Next
End Sub


Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Rellenar_Tabla2(DataGridView1)
End Sub
End Class

Me quedó pendiente lo de representar, pero no me era tan urgente

Si a alguien le sirve (suponiendo que esté bien) estaría encantado

Un saludo