Soy nuevo por aca

rivate Sub Form9_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 'AuditoriaDataSet1.Tipo_de_Hallazgos' Puede moverla o quitarla según sea necesario.
Me.Tipo_de_HallazgosTableAdapter.Fill(Me.Auditoria DataSet1.Tipo_de_Hallazgos)
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
dim b as string
dim c as string
If c = "" Or b = "" Then
MessageBox.Show("Ingresar registros")
Else
cmd.CommandText = " INSERT into [Tipo de Hallazgos] ([Tipo de Hallazgo], [Descripcion del Tipo de Hallazgo]) VALUES ('" & c & "', '" & b & "') "
cmd.ExecuteNonQuery()
cmd.CommandText = "SELECT * FROM [Tipo de Hallazgos]"
cmd.ExecuteScalar()
MessageBox.Show("REGISTRO GUARDADO")