herley

Solo tienes que abrir lo mismo con OUTPUT te paso el código para que te quede más claro: Private Sub Command1_Click() Open "C:\WINDOWS\Escritorio\datos.txt" For Input Lock Write As #1 Dim Linea As String Dim suma As Byte Line Input #1, Linea suma =...

Lo que intentas funciona bien, pero verifica que instalaste correctamente el VB y el Crystal en el computador donde generaste la aplicación y si no falta ningún componente. A veces no te registra correctamente alguna dll o ocx así como puede que ya...