Trabajo con Visual Basic 2008
Código vb:
Ver original
Dim conexion As New SqlClient.SqlConnection(My.MySettings.Default.BD_MDFConnectionString) conexion.Open() Dim valor As Integer Dim Comando As New SqlClient.SqlCommand() Comando.CommandType = System.Data.CommandType.Text Comando.CommandText = "SELECT Nombre FROM Materia WHERE Nombre = '" & TextBox1.Text & "'" Comando.Connection = conexion valor = Comando.ExecuteScalar If valor = 0 Then NombreTextBox.Text = TextBox1.Text cargar() conexion.Close() Else MsgBox("Materia Existente!", MsgBoxStyle.Exclamation) conexion.Close() End If
espero que me puedan ayudar.. me tira este error ---> "La conversión de la cadena "Bibliología" en el tipo 'Integer' no es válida"