sumar datos list1

[corlo]

Hola soy Corlo

Tengo una duda en sumar el datos.subtotal del list1

el codigo que tengo hasta ahora es:

Código [Seleccionar] Expandir




dim gh as string
gh = App.Path & "\facturas" & "\" & Prefix_Facturas & Text3.Text & ".TXT"
        Open gh For Random As #1 Len = Len(datos)
        Get #1, (List1.ListIndex + 1), datos
        Text7.Text = datos.producto
        Text8.Text = datos.precio
        Text9.Text = datos.existencias
        Text10.Text = datos.subtotal
        Close #1





gracias

[Shell Root]

Sumar? Donde estás sumando?

[corlo]

hola soy corlo

necesito sumar la variable datos.subtotal del list1

ahora no hace la suma, por eso os pregunto ¿como puedo hacer la suma de la variable
datos.subtotal

Código [Seleccionar] Expandir



dim gh as string
gh = App.Path & "\facturas" & "\" & Prefix_Facturas & Text3.Text & ".TXT"
        Open gh For Random As #1 Len = Len(datos)
        Get #1, (List1.ListIndex + 1), datos
        Text7.Text = datos.producto
        Text8.Text = datos.precio
        Text9.Text = datos.existencias
        Text10.Text =[b] datos.subtotal[/b]

        Close #1





[Shell Root]

Tendrías primero que recorrer los datos para realizar la sumatoria, lo almacenas en una variable de x tipo, en este caso sería Integer

Código (vb) [Seleccionar] Expandir

Dim Sum As Integer
For
  Sum = Sum + CInt(datos.subtotal)
Next

[corlo]

Hola soy corlo

gracias por responder shell root

osea mas o menos seria asi el codigo

Código [Seleccionar] Expandir




dim d as integer
dim sum as integer
dim gh as string
gh = App.Path & "\facturas" & "\" & Prefix_Facturas & Text3.Text & ".TXT"
        Open gh For Random As #1 Len = Len(datos)
        Get #1, (List1.ListIndex + 1), datos
        Text7.Text = datos.producto
        Text8.Text = datos.precio
        Text9.Text = datos.existencias
        Text10.Text = datos.subtotal
       

for d = 1 to list1.listcount-1
sum = sum + cint(datos.subtotal)
next d

text11.text = sum

Close #1







[XresH]

Hola, a ver colega corlo, te estas liando, vos tenes un tipo de dato que queres sumar, pero no es un array, por lo que no podes hacer un for ejecutandolo en si el mismo ya que contiene solo un valor y no varios items.

Los varios items segun veo en tu codigo estan en otras variables en el mismo tipo de dato, por lo que tenes que sumar esas o bien utilizar a donde estas transfiriendo los datos, o sea los textbox a los cuales les estas asignando los valores.

Para mi por cuestion de costumbres, seria mas sencillo crear un array, transferir todos los valores para luego sumarlos como lo estas haciendo a traves de un for.

Sino estas enredandote en algo que no vas a encontrarle salida, porque el valor de esa variable no tendra otro sino se lo asignas, en tu caso siempre seria el mismo.

Saludos.

[corlo]

Hola soy Corlo

Gracias por responder XresH

Me podrias poner un ejemplo de lo que explicas con codigo , por que soy novato en tema de programacion, gracias