Chiarimento Su Un Esempio In Vba

[JeS]

sto imparando ad usare Vba e sorrei sapere nel seguente esempio, cosa sta ad indicare #1:

Open strNomeFile For Output As #1

Print #1, txtFile.Text

Close #1

perchè so che quando si scrise As .... vuol dire che indico il tipo di dati della variabile.

Grazie

[GiRock]

Ciao,

#1 indica l'identificativo numerico del file aperto (handle) in modo che la lettura o la scrittura sia eseguita correttamente...

Esempio

Poniamo che tu debba leggere qualcosa da un file e nel contempo scrivere in un altro, oltre al nome del file dovrai specificare un handle differente per ogni file aperto...

Open strNomeFileA For Output As #1

Open strNomeFileB For Input As #2

Line Input #2, txtFile.Text

Print #1, txtFile.Text

Close #2

Close #1

Per non commettere errori, la sintassi corretta prevede l'uso di Freefile, in modo da ottenere un identificativo univoco per ogni handle...

Esempio

Dim sIn As String

Dim sOut As String

Dim hff1 As Integer, hff2 As Integer ' hff = handle free file

hff1 = Freefile()

Open strNomeFileA For Output As #hff1

hff2 = Freefile()

Open strNomeFileB For Input As #hff2

Line Input #hff2, sIn

sOut= UCase$(sIn) ' trasformo sIn tutta in maiuscolo

Print #hff1, sOut

Close #hff2

Close #hff1