Visual Basic - Guardar registros en Base de Datos con Visual Studio 2010

Hola a todos, vereis tengo un formulario con una DataGrid 4 TextBox y un botón llamado Guardar, cuando introduzco datos desde los TextBox los introduzco en la DataGrid y cuando cierro la aplicación y la vuelvo a abrir resulta que no me los ha grabado en la Base de Datos.

Alguien me puede ayudar?. Gracias

[code]
Imports System.Data.SqlClient
Publi.Class Form2
Dim row(4) As String
Private Property Queryable As String

Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'TODO: esta línea de código carga datos en la tabla 'Database2DataSet.BARCINO' Puede moverla o quitarla según sea necesario.
Me.BARCINOTableAdapter.Fill(Me.Database2DataSet.BARCINO)
Button2.Text = "Salir"
Button1.Text = "Guardar"
DataGridView1.ColumnCount = 4
DataGridView1.Columns(0).Name = "Fabricante"
DataGridView1.Columns(1).Name = "Modelo"
DataGridView1.Columns(2).Name = "Denominacion del Recambio"
DataGridView1.Columns(3).Name = "Referencia"
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
End
Form1.Show()
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
BARCINOBindingSource.AddNew()
BARCINOBindingSource.Current("fabricante") = TextBox4.Text
BARCINOBindingSource.Current("modelo") = TextBox3.Text
BARCINOBindingSource.Current("denominacion del recambio") = TextBox2.Text
BARCINOBindingSource.Current("referencia") = TextBox1.Text
TextBox4.Text = ""
TextBox3.Text = ""
TextBox2.Text = ""
TextBox1.Text = ""
Me.Validate()
BARCINOBindingSource.EndEdit()
BARCINOTableAdapter.Update(Database2DataSet.BARCINO)
End Sub