to see if I have posting ability activated ok

[Private Sub pbOk_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles pbOk.Click

'need to validate fields here


'need to Add a record here

Dim Row = Me.prodDataset.prod.NewprodRow

Row.prodNbr = Me.prodNbr.Text
Row.binNbr = Me.cbbinNbr.Text
Row.Quantity = Me.QuantityTextBox.Text
Row.UOM = Me.UOMTextBox.Text
Row.Location = Me.LocationTextBox.Text


Me.prodDataset.prod.AddprodRow(Row)

'Me.Update() - do I need an Update ? if so what is the syntax
'Row.AcceptChanges() - and an acceptchanges ?


Me.Close()

'Open the prod_Add Form again

Dim oForm As prod_Add
oForm = New prod_Add()
oForm.Show()
oForm = Nothing

End Sub]

and some code using code button