Visual Basic - Sumar valor con consulta sql SUM

Life is soft - evento anual de software empresarial
 
Vista:
sin imagen de perfil
Val: 73
Ha disminuido su posición en 2 puestos en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

Sumar valor con consulta sql SUM

Publicado por pablo (52 intervenciones) el 21/11/2017 16:33:34
Buenos dias

Les hago una consulta, tengo el siguiente codigo que me hace las sumas perfectas, sin dramas, el tema esta en que me redondea los decimales por ej: 17,50 + 1,30 = 19 y no a 18.80 .
Yo necesitaria que me muestre los decimales y no los redondee.
Se les ocurre alguna idea?

Saludos


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Public Function Retornar_resultado_suma(ByVal nom_cont As Integer) As Integer
    Dim fecha As String
    fecha = dato1.Text
 
    Dim nro As Decimal
 
 
 
    Using cn As New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source= \\192.168.0.26\Programa\bin\base\stock.accdb;Persist Security Info=False")
        cn.Open()
 
        Dim sql As String = "SELECT IIf (ISNULL(SUM(EFECTIVO)),0,sum(efectivo)) FROM CAJA WHERE FECHA =  '" & fecha & "' "
        Dim valor1 As Integer = 0
        Dim cmd As New OleDb.OleDbCommand(sql, cn)
 
 
        nro = cmd.ExecuteScalar
 
 
    End Using
 
    Return nro
 
End Function
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder