Otravez en ExecuteNonQuery() 
Imports System.Data.SqlClient
Public Class Form1
Inherits System.Windows.Forms.Form
Private oConexion As SqlConnection
Private oDataSet As DataSet
Private oDataAdapter As SqlDataAdapter
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'Crear conexión
oConexion = New SqlConnection
oConexion.ConnectionString = "Server=(local);Database=Registros;uid=sa;pwd= ;"
'Crea Adaptador
oDataAdapter = New SqlDataAdapter
'Crea comandos para inserción, consulta con sis parámetros
'y asignarlos al adaptador
Dim oCmdInsercion As New SqlCommand("INSERT INTO EMPLEADOS" & "(IdEmpleado,Empleado), VALUES(@IdEmpleado,@Empleado)", oConexion)
oDataAdapter.InsertCommand = oCmdInsercion
oDataAdapter.InsertCommand.Parameters.Add(New SqlParameter("@IdEmpleado", SqlDbType.Int))
oDataAdapter.InsertCommand.Parameters.Add(New SqlParameter("@Empleado", SqlDbType.NVarChar))
Dim oCmdConsulta As New SqlCommand("SELECT * FROM EMPLEADOS", oConexion)
oDataAdapter.SelectCommand = oCmdConsulta
'Crea un conjundo de datos
oDataSet = New DataSet
Me.CargarDatos()
End Sub
Private Sub CargarDatos()
'Vaciar el database
oDataSet.Clear()
oConexion.Open() 'abrir conexion
oDataAdapter.Fill(oDataSet, "Empleados")
oConexion.Close() 'Cierra conexion
'Enlazar dataset con datagrid
'En DataSource se asigna el dataset
'En DataMenber el nombre de la tabla del dataset que
'mostrará el datagrid
Me.grdDatos.DataSource = oDataSet
Me.grdDatos.DataMember = "EMPLEADOS"
End Sub
Private Sub btnGrabar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnGrabar.Click
Dim iResultado As Integer
'Asigna valores a los parámetros para el comando de inserción
oDataAdapter.InsertCommand.Parameters("@IdEmpleado ").Value = Me.txtIdEmpleado.Text
oDataAdapter.InsertCommand.Parameters("@Empleado") .Value = Me.txtEmpleado.Text
'Abrir conexion
oConexion.Open()
iResultado = oDataAdapter.InsertCommand.ExecuteNonQuery()
oConexion.Close()
MessageBox.Show("Registro añadidos: " & iResultado)
Me.CargarDatos()
End Sub
End Class
ESTOY UTILIZANDO SQLSERVER 2000, Y QUIERO AGREGAR DATOS PERO NO SE PORQUE NO PUEDO ME SALE EL ERROR DE:
An unhandled exception of type 'System.FormatException' occurred in system.data.dll
Additional information: Input string was not in a correct format.
GRACIAS
