Saludos!
No estás declarando los parámetros @codigo y @descr, te estás equivocando con:
Dim codigo As Integer
Dim descr As String
codigo = 6
descr = "Hola2"
Así sólo declaras unas variables pero no parámetros del SQL, prueba con:
Código:
Dim insCon As New SqlConnection("server=localhost;uid=sa;pwd=admin;d atabase=csnet")
Dim insCmd As SqlCommand
Dim insstring As String
insstring = "INSERT INTO categoriausr VALUES(@codigo,@descr);"
insCmd = New SqlCommand(insstring, insCon)
Dim parametro As SqlParameter
parametro = insCmd.Parameters.Add("@codigo", SqlDbType.Int)
parametro.Value = 6
parametro = insCmd.Parameters.Add("@descr", SqlDbType.VarChar, 255)
parametro.Value = "Hola2"
insCon.Open()
insCmd.ExecuteNonQuery()
insCon.Close()
Espero que te sirva. Saludos!