Đăng nhập với Microsoft
Đăng nhập hoặc tạo một tài khoản.
Xin chào,
Chọn một tài khoản khác.
Bạn có nhiều tài khoản
Chọn tài khoản bạn muốn đăng nhập.

Lưu ý: Hàm, phương pháp, đối tượng hoặc thuộc tính được mô tả trong chủ đề này bị tắt nếu dịch vụ biểu thức Microsoft Jet đang chạy trong chế độ sandbox, ngăn không cho đánh giá các biểu thức không an toàn tiềm ẩn. Để biết thêm thông tin về chế độ sandbox, hãy tìm kiếm "chế độ sandbox" trong trợ giúp.

Trả về chuỗi có chứa các ký tự từ một tệp đã mở trong chế độ nhập hoặc nhị phân .

Cú pháp

Đầu vào ( số, [# ] filenumber)

Cú pháp hàm input có các đối số sau đây:

Đối số

Mô tả

number

Bắt buộc. Bất kỳ biểu thức số hợp lệ nào xác định số lượng ký tự để trả về.

filenumber

Bắt buộc. Bất kỳ số tệp hợp lệ nào.


Chú thích

Dữ liệu đã đọc với hàm input thường được viết vào một tệp có in # hoặc đặt. Chỉ sử dụng hàm này với các tệp được mở trong chế độ nhập hoặc nhị phân .

Không giống như đầu vào # câu lệnh, hàm input sẽ trả về tất cả các ký tự mà nó đọc, bao gồm cả dấu phẩy, vận chuyển trả về, dòng thông tin, dấu ngoặc kép và không gian đứng đầu.

Với các tệp được mở cho truy nhập nhị phân , một nỗ lực để đọc qua tệp bằng cách dùng hàm inputcho đến khi trả về True tạo ra lỗi. Sử dụng các hàm lofLoc thay vì EOF khi đọc các tệp nhị phân bằng đầu vàohoặc dùng khi sử dụng hàm EOF .

Lưu ý:  Sử dụng hàm INPUTB cho dữ liệu byte chứa trong các tệp văn bản. Với INPUTB, số chỉ định số byte để trả về số lượng ký tự cần trả về.

Ví dụ

Lưu ý: Các ví dụ sau thể hiện cách sử dụng hàm này trong mô-đun Visual Basic for Applications (VBA). Để biết thêm thông tin về cách làm việc với VBA, chọn Tham khảo dành cho Nhà phát triển trong danh sách thả xuống cạnh Tìm kiếm, rồi nhập một hoặc nhiều từ vào hộp tìm kiếm.

Ví dụ này sử dụng hàm input để đọc một ký tự một lần từ một tệp và in nó vào cửa sổ ngay lập tức . Ví dụ này giả định rằng TESTFILE là một tệp văn bản có một vài dòng dữ liệu mẫu.

Dim MyChar
Open "TESTFILE" For Input As #1 ' Open file.
Do While Not EOF(1) ' Loop until end of file.
MyChar = Input(1, #1) ' Get one character.
Debug.Print MyChar ' Print to the Immediate window.
Loop
Close #1 ' Close file.

Bạn cần thêm trợ giúp?

Phát triển các kỹ năng của bạn

KHÁM PHÁ NỘI DUNG ĐÀO TẠO >

Sở hữu tính năng mới đầu tiên

THAM GIA NGƯỜI DÙNG NỘI BỘ MICROSOFT 365 >

Thông tin này có hữu ích không?

Bạn hài lòng đến đâu với chất lượng dịch thuật?
Điều gì ảnh hưởng đến trải nghiệm của bạn?

Cảm ơn phản hồi của bạn!

×