Satura rādītājs
Ievades apraksts
Atgriež atvērto ieejas vai binārā faila straumi.
Ievades sintakse
| 1 | Ievadīšana (skaitlis, [#] faila numurs) |
Ievades paziņojumā ir 2 argumenti:
Skaitlis: Atgriežamo rakstzīmju skaits.
Faila numurs:Derīgs faila numurs.
Excel VBA ievades paziņojuma piemēri
Lai pārbaudītu ievades paziņojumu, D diskā izveidojiet teksta failu “test.txt”. (D: \ test.txt) Pieņemsim, ka faila saturs ir šāds.
| 123 | abc1 2 3xy z |
Lūdzu, palaidiet šādu kodu.
| 1234567891011 | Apakšējā ievade_Fx_Example ()Dim strContent kā virkneDim MyCharAtveriet "D: \ test.txt", lai ievadītu kā #1 'Atvērt failu.Darīt, kamēr nav EOF (1) 'Cilpa līdz faila beigām.MyChar = Input (1, #1) 'Iegūstiet vienu rakstzīmi.strContent = strContent & MyChar 'CilpaMsgBox strContentAizvērt #1 'Aizvērt failu.Beigu apakš |
Tad rezultāts būs šāds.
