Satura rādītājs
Līnijas ievades apraksts
Nolasa vienu rindu no Open secīga faila un piešķir to virknei.
Līnijas ievades sintakse
| 1 | Līnijas ievade #FailaNumurs, VarName |
Rindas ievades paziņojumā ir 2 argumenti.
Faila numurs: Jebkurš derīgs faila numurs.
VarName: Derīgs mainīgā vai virknes mainīgā nosaukums.
Excel VBA rindas ievades paziņojuma piemēri
Lai pārbaudītu rindas 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.
| 12345678910111213 | Apakšrindas ieejas_piemērs ()Dim strLine kā virkneDim strContent kā virkneAtveriet "D: \ test.txt", lai ievadītu kā #1 'Atvērt failu.Darīt, kamēr nav EOF (1) 'Cilpa līdz faila beigām.Līnijas ievade #1, strLine 'Lasiet rindu mainīgajā.strContent = strContent & strLineCilpaAizvērt #1 'Aizvērt failu.MsgBox strContentBeigu apakš |
Tad rezultāts būs šāds.
