Problama con los datos de un dataset

Hola a todos, les cuento que quiero agregar datos a una tabla que esta en
un
dataset manualmente, el dataset ya tiene la tabla solo es de agregar una
Row
a la tabla.
El codigo que uso es el siguiente, pero ya busque y al paracer esta bien,
pero no me funcion. Si alguien me puede ayudar se lo agradeceria
grandemente

Dim moDS As New DS_compras

Dim myRow As DataRow

myRow = moDS.tbl_datos_empresa.NewRow()

myRow.Item("empresa") = Me.cmb_empresas.Text

myRow.Item("nrc") = "143040-0"

myRow.Item("nit") = "0614-030702-104-6"

myRow.Item("mes") = Me.cmd_mes.Text

moDS.tbl_datos_empresa.Rows.Add(myRow)