Metodo Exceute Scalar en vb.net
'cadena de conexión para la base de datos Const cs As String = "Data Source=(local)\SQLEXPRESS;" & _ "Initial Catalog=la base de datos;" & _ "Integrated Security=true" ' Inicializar Dim conexion As New SqlConnection(cs) Try ' Instanciar un SqlCommand para ejecutar el Select Count Dim cmd As New SqlCommand("Select Count(*) As Total From Clientes", conexion) ' Ejecutar el Open para Abrir la conexión conexion.Open() Dim total As Integer = 0 ' Ejecutar el método ExecuteScalar y devolver el ' registro pertenciente a la primera columna de la primer fila del conjunto de datos total = CType(cmd.ExecuteScalar, Integer) ' convertir el tipo de datos a Integer ' Mostrar el resultado para el Total de Clientes MsgBox("El total de Clientes es :" & total, MsgBoxStyle.Information) Catch exSql As SqlException MsgBox(exSql.Message.ToString) Catch ex As Exception MsgBox(ex.Message.To...