Tuyên bố đầu vào dòng VBA

Mô tả đầu vào dòng

Đọc một dòng đơn từ tệp tuần tự Mở và gán nó vào một chuỗi.

Cú pháp nhập dòng

1 Đầu vào dòng #FileNumber, VarName

Câu lệnh Line Input chứa 2 đối số:

Số của tập tin: Bất kỳ số tệp hợp lệ nào.

VarName: Tên biến chuỗi hoặc chuỗi hợp lệ.

Ví dụ về câu lệnh nhập dòng VBA trong Excel

Để kiểm tra Câu lệnh đầu vào dòng, hãy tạo tệp văn bản “test.txt” trên ổ D. (D: \ test.txt) Giả sử rằng nội dung của tệp như sau.

123 abc1 2 3XYZ

Vui lòng chạy mã sau.

12345678910111213 Sub LineInput_Example ()Dim strLine As StringDim strContent As StringMở "D: \ test.txt" cho Đầu vào là # 1 'Mở tệp.Do While Not EOF (1) 'Vòng lặp cho đến khi kết thúc tệp.Đầu vào Dòng # 1, strLine 'Đọc dòng vào biến.strContent = strContent & strLineVòngĐóng # 1 'Đóng tệp.MsgBox strContentKết thúc Sub

Sau đó, kết quả sẽ như sau.

wave wave wave wave wave