Cargar Filas tabla en Textbox

[cRz87]

no acabo de entenderlo... antes de todo esto tengo que hacer la consulta no?
Mira yo tengo esto:

Dim cmd As New OleDb.OleDbCommand("INSERT INTO peticio VALUES('" & CInt(Lnum.Text) & "','" & Cbproveidor.Text & " ','" & Ldata.Text & "','" & Tbq1.Text & " ','" & txt1.Text & "','" & Tbunitat1.Text & "','" & Tbpreu1.Text & "','" & Tbtotal.Text & "','Enviat')", conex)
conex.Open()
cmd.ExecuteNonQuery()
Dim tabla As New DataTable
tabla.Columns.Add("quantitat")
tabla.Columns.Add("descripcio")
tabla.Columns.Add("preu_producte")

tabla.Rows.Add(Tbq1.Text, txt1.Text, Tbunitat1.Text)
tabla.Rows.Add(Tbq2.Text, txt2.Text, Tbunitat2.Text)
tabla.Rows.Add(Tbq3.Text, txt3.Text, Tbunitat3.Text)
tabla.Rows.Add(Tbq4.Text, txt4.Text, Tbunitat4.Text)
tabla.Rows.Add(Tbq5.Text, txt5.Text, Tbunitat5.Text)
tabla.Rows.Add(Tbq6.Text, txt6.Text, Tbunitat6.Text)
tabla.Rows.Add(Tbq7.Text, txt7.Text, Tbunitat7.Text)
tabla.Rows.Add(Tbq8.Text, txt8.Text, Tbunitat8.Text)
conex.Close()

MsgBox("Petició d'stock registrat a la Base de Dades")

Pero claro solo ejecuta la consulta del principio lo demás que me has dicho no lo hace, en que me equivoco?