Visual Basic - Sumar valor con consulta sql SUM

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

Sumar valor con consulta sql SUM

Publicado por pablo (24 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