[urgente]tengo un problema profavor ayudenme

[ferrar1000]

miren tengo el sigiente codigo:

Código:

Open "deposito_1.txt" For Random As #1 Len = Len(FicheroDatos)
Get #1, 1, FicheroDatos
Dim suma As Integer
Dim suma1 As Integer
Dim suma2 As Integer
suma1 = FicheroDatos
suma2 = Text1.Text
suma = suma1 + suma2
FicheroDatos = suma
Put #1, 1, FicheroDatos
Close #1

dentro de un command_button

pero no consigo que funcione pork me dice que el "FicheroDatos" no sirve para un integer

como podria meter "FicheroDatos" en un integer?

[Kruzado]

ejemplo :

ficherodatos="10"
xx=val(ficherodatos)
xx ahora vale 10 y no "10"

se entiende?

[fredny]

No entiendo mucho tu consulta, pero podrias probar con otras funciones de conversion tipo cdbl() o dando format(dato, "###.##0,00")

Salu2,
[email protected] (argentina)