Ver Mensaje Individual
  #7 (permalink)  
Antiguo 08/07/2010, 09:42
raul_mail2005
 
Fecha de Ingreso: junio-2010
Mensajes: 12
Antigüedad: 14 años, 6 meses
Puntos: 0
Respuesta: Con que instruccion saco el resultado de la suma de una columna?

LO LOGRE RESOLVER LA INSTRUCCION EN NEGRITA ES LA QUE JALA EL DATO DE LA SUMA AL LABEL, GRACIAS A TODOS POR SU AYUDA, AHI LES DEJO EL CODIGO POR SI ALGUIEN TIENE EL MISMO PROBLEMA, NUEVAMENTE GRACIAS.

Try
Dim MiDataSet As New DataSet
Dim Comando As SqlClient.SqlCommand = New SqlClient.SqlCommand
Dim Adaptador As SqlClient.SqlDataAdapter = New SqlClient.SqlDataAdapter
Dim objSum As Object
conectar()
Comando.CommandText = "Select cantidadcom as CANTIDAD,nombre_plato AS PLATILLO, precio_plato AS PRECIO1, cantidadbeb AS CANTIDAD2,nombre_bebida AS BEBIDA, precio_bebida AS PRECIO2 from detalle where idorden = '" & idorden.Text & "'"
Comando.Connection = cnn
Adaptador.SelectCommand = Comando
Adaptador.Fill(MiDataSet)
DataGrid1.DataSource = MiDataSet.Tables(0)
objSum = MiDataSet.Tables(0).Compute("Sum(precio1)", Nothing)
TOTAL_COMIDA.Text = (CStr(objSum)) Catch ex As Exception
MsgBox("NO HAY DATOS PARA SUMAR", MsgBoxStyle.Critical)
End Try