error sintaxis basic - Simbolo no esperado: GET
Publicado por aitor (1 intervención) el 29/05/2008 20:25:59
Estoy intentando convertir una aplicación de Excel en Visual Basic for Aplications a Open Office Calc y Basic y recibo el error de simbolo no esperado GET cuando compilo una rutina sencilla y no entiendo porque ?
La función GET existe en Open Office al igual que en VBA
Sub test()
Dim filename As String
Dim numfile As Integer
Dim value As String
filename = "C:Result.txt"
numfile = FreeFile
If numfile <> 0 Then
Open filename For Binary As #numfile
value = Space(LOF(numfile))
Get #numfile, , value
Close #numfile
MsgBox value
End If
MsgBox " end "
End Sub
Este ejemplo funciona perfectamente en Excel. Alguien sabe que me pasa ? Gracias
La función GET existe en Open Office al igual que en VBA
Sub test()
Dim filename As String
Dim numfile As Integer
Dim value As String
filename = "C:Result.txt"
numfile = FreeFile
If numfile <> 0 Then
Open filename For Binary As #numfile
value = Space(LOF(numfile))
Get #numfile, , value
Close #numfile
MsgBox value
End If
MsgBox " end "
End Sub
Este ejemplo funciona perfectamente en Excel. Alguien sabe que me pasa ? Gracias
Valora esta pregunta


0