Almacenamiento de un Registro SQL

[alejandrom]

Estoy Usando SQL Server. En el Formulario tengo 2 Texbox uno llamado Cod y otro Des ademas tengo 2 botones unos de insertar y otro de Grabar.

Inherits System.Windows.Forms.Form
Dim cnx As New SqlClient.SqlConnection("Mi Conection")
Dim daClas As New SqlClient.SqlDataAdapter("SELECT * FROM inClas01", cnx)
Dim dsClas As New DataSet
Dim Table As New DataTable
Dim Pos As Integer

en el FormLoad*******************

cnx.Open()
daClas.Fill(dsClas, "inClas01")
cnx.Close()
Table = dsClas.Tables(0)

Pos = 0
Enlazar()

***************************************

Public Sub Enlazar()

Dim oDataRow As DataRow
oDataRow = Table.Rows(Pos)

Cod.Text = oDataRow("Cod")
Des.Text = oDataRow("Descrip")


End Sub

********************Insertar****************

Private Sub ins_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ins.Click
Dim NewLine As DataRow

NewLine = Table.NewRow
NewLine("Cod") = Cod.Text
NewLine("Descrip") = Des.Text
Table.Rows.Add(NewLine)

End Sub

*****************Grabar*********************

Private Sub gra_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles gra.Click

daClas.Update(dsClas,"inClas01")

End Sub

********************************************


Al pulsar el boton de Grabar me da el siguiente error

Additional information: Update requires a valid InsertCommand when passed DataRow collection with new rows.

QUE DEBO HACER POR FAVOR.

si me mandan un ejemplo lo agradeceria

Gracias