Funkcja Input

Funkcja Input zwraca wartość typu String zawierającą znak z pliku otwartego w trybie Input lub Binary.

Składnia funkcji Input:

Input(Numer, [#]NrPliku)

Argument Numer jest wymaganym wyrażeniem numerycznym określającym numer znaku.
Argument NrPliku jest wymganym poprawnym całkowitym numerem pliku.

Dane odczytywane przez funkcję Input są zwykle zapisywane do pliku przez Print # lub Put. Funkcji tych należy używać tylko z plikami otwartymi w trybie Input lub Binary.

W przeciwieństwie do rozkazu Input #, funkcja Input zwraca wszystkie przeczytane znaki, włączając w to znaki powrotu karetki (carriage return), podziału linii (linefeed) i wiodące spacje.
Przy plikach otwartych w trybie Binary, próba odczytu z pliku przy użyciu funkcji Input podczas, gdy funkcja EOF() zwraca wartość True, spowoduje błąd.
Należy używać funkcji LOF() i Loc() zamiast funkcji EOF() podczas odczytu plików binarnych przez Input oraz używać rozkazu Get podczas używania funkcji EOF().

Funkcji InputB należy używać z danymi typu byte zawartymi w plikach tekstowych. Funkcja InputB określa liczbę bajtów zamiast liczby znaków do zwrócenia.

Przykład użycia funkcji Input:

Dim varZnak As Variant
Open "FILE" For Input As #1  'otwórz plik
varZnak=Input(1,#1)  'odczytaj znak
Close #1  'zamknij plik

(Zmienne, typy zmiennych i rozkazy Open i Close zostały opisane w innych częściach kursu.)

na górę strony...