Private sqc As SqlCommand
Private sqa As SqlDataAdapter
Private datos As DataSet
Private sqp As SqlParameter
Private sc As Coneccion
-en el caso tuyo el boton guardar
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
sqc = Me.getProced("nombre del procedimiento")
-En el caso tuyo ingresar cliente. La variable nombre tiene que estar igual en el procedimiento creado y ser del mismo tipo
sqp = sqc.Parameters.Add("@Nombre", SqlDbType.Char)
sqp.Value = Me.textbox1.Text
sqp = sqc.Parameters.Add("@Apellido", SqlDbType.NVarChar)
sqp.Value = Me.TextBox2.Text
sqp = sqc.Parameters.Add("@Direccion", SqlDbType.NVarChar)
sqp.Value = Me.TextBox3.Text
sqc.CommandType = CommandType.StoredProcedure
sqa = New SqlDataAdapter(sqc)
datos = New DataSet
sqa.Fill(datos)
MsgBox("transaccion con exito")
Public Function getProced(ByVal datos As String) As SqlCommand
sqc = New SqlClient.SqlCommand(datos, sc)
Return sqc