¿Cómo relacionar dos tablas en Visual Basic 2008 o 2010?

Hola:
tengo en un formulario dos Datagridview, un DateTimepicker, y seis Textbox. A través de los Datagridview ingreso los datos, tengo en la base de datos dos
tablas una para el Datagridview1 y el Datagridview2, y otra tabla para los
textbox y el datetimepicker. Mi duda es la siguiente como puedo relacionar las
dos tablas??


Este es el código que utilizo en el botón guardar:

Private Sub cmdguardar2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdguardar2.Click

Dim query As String = "INSERT INTO
Presupuesto(Unidad_de_negocio, Contrato_Marco_nro, Indice_zona,
Indice_rubro, Fecha, Codigoo_de_edificio, Edificio, Descripcion_gral,
nro_de_presupuesto, Plazo_de_obra, nro_de_ticket,
Importe_total, Contratista, Zona, Requerimiento_de_ticket, Rubro, Item,
Descripción, Cant, Unidad, Precio_unitario, Subtotal, Observaciones,
Total_sin_iva)VALUES (?Unidad_de_negocio, ?Contrato_Marco_nro,
?Indice_zona, ?Indice_rubro, ?Fecha, ?Codigoo_de_edificio,
?Edificio, ?Descripcion_gral, ?nro_de_presupuesto, ?Plazo_de_obra,
?nro_de_ticket, ?Importe_total, ?Contratista, ?Zona,
?Requerimiento_de_ticket, ?Rubro, ?Item, ?Descripción, ?Cant, ?Unidad,
?Precio_unitario, ?Subtotal, ?Observaciones, ?Total_sin_iva)"

Dim cmd As New MySqlCommand(query, conexión)

cmd.Parameters.AddWithValue("?unidad_de_negocio", textunidad.Text)
cmd.Parameters.AddWithValue("?Contrato_Marco_nro", Textcontrato.Text)
cmd.Parameters.AddWithValue("?Indice_zona", Textindicezona.Text)
cmd.Parameters.AddWithValue("?Indice_rubro", Textindicerubro.Text)
cmd.Parameters.AddWithValue("?Fecha", fecha.Value.Date)
cmd.Parameters.AddWithValue("?Total_sin_iva", textsiniva.Text)

For Each row As DataGridViewRow In DataGridView1.Rows

cmd.Parameters.AddWithValue("?Codigoo_de_edificio", row.Cells(0).Value)
cmd.Parameters.AddWithValue("?Edificio", row.Cells(1).Value)
cmd.Parameters.AddWithValue("?Descripcion_gral", row.Cells(2).Value)
cmd.Parameters.AddWithValue("?nro_de_presupuesto", row.Cells(3).Value)
cmd.Parameters.AddWithValue("?Plazo_de_obra", row.Cells(4).Value)
cmd.Parameters.AddWithValue("?nro_de_ticket", row.Cells(5).Value)
cmd.Parameters.AddWithValue("?Importe_total", row.Cells(6).Value)
cmd.Parameters.AddWithValue("?Contratista", row.Cells(7).Value)
cmd.Parameters.AddWithValue("?Zona", row.Cells(8).Value)
cmd.Parameters.AddWithValue("?Requerimiento_de_ticket", row.Cells(9).Value)

For Each row As DataGridViewRow In DataGridView2.Rows

cmd.Parameters.AddWithValue("?Rubro", row.Cells(0).Value)
cmd.Parameters.AddWithValue("?Item", row.Cells(1).Value)
cmd.Parameters.AddWithValue("?Descripción", row.Cells(2).Value)
cmd.Parameters.AddWithValue("?Cant", row.Cells(3).Value)
cmd.Parameters.AddWithValue("?Unidad", row.Cells(4).Value)
cmd.Parameters.AddWithValue("?Precio_unitario", row.Cells(5).Value)
cmd.Parameters.AddWithValue("?Subtotal", row.Cells(6).Value)
cmd.Parameters.AddWithValue("?Observaciones", row.Cells(7).Value)

Next

cmd.ExecuteNonQuery()

Next

MsgBox("Se guardo correctamente el Registro", vbInformation, "titulo")

End Sub

Las tablas que quiero relacionar se llaman Presupuesto1
y Presupuesto2. Los valores de Presupuesto1 son los siguientes:
Unidad_negocio, Contrato_marco(Llave primaria), Indice_zona, Indice_rubro,
Fecha, Total_sin_iva. Y Presupuesto2 llevas los valores del datagridview1
y datagridview2:Codigo_edificio(Llave única), Edificio, Descripcion_gral,
Nro_presupuesto(Llave primaria), Plaso_obra, Nro_Ticket(Llave única),
Importe_total, Contratista, Zona, Requerimiento_ticket, Rubro, Item,
Descripción, Cant, Unidad, Precio_unitario, Subtotal

Que debería modificar en el código o que me recomiendan hacer?????