Write Statement

Ghi dữ liệu vào một tập tin dãy.

Cú pháp:

Write [#FileName], [Expressionlist]

Tham số :

FileName: bất cứ biểu thức thuộc số nào mà chứa số thứ tự tập tin mà được đặt bởi câu lệnh Mở (Open) cho tập tin tương ứng.

Expressionlist: danh sách định giới bằng dấu phẩy, chứa các biến hoặc biểu thức mà bạn muốn nhập vào một tập tin.

Bỏ sót biểu thức thì câu lệnh Write (Ghi) phụ thêm một dòng rỗng vào tập tin.

Để thêm một danh sách biểu thức vào một tập tin mới hoặc tập tin đã tồn tại, tập tin phải được mở ở chế độ Kết xuất hoặc Phụ thêm.

Các chuỗi bạn ghi sẽ tự động được kẹp giữa hai dấu nháy kép và phân cách bằng dấu phẩy. Bạn không cần nhập các ký tự phân cách vào danh sách biểu thức.

Mỗi câu lệnh Write (Ghi) thì xuất một ký hiệu kết thúc dòng dưới dạng mục nhập cuối cùng.

Con số có dấu tách thập phân được chuyển đổi tùy theo thiết lập miền địa phương.

Thí dụ :

Sub ExampleWrite

Dim iCount As Integer

Dim sValue As String

    iCount = Freefile

    Open "C:\data.txt" For Output As iCount

    sValue = "Hamburg"

    Write #iCount,sValue,200

    sValue = "New York"

    Write #iCount,sValue,300

    sValue = "Miami"

    Write #iCount,sValue,450

    Close #iCount

End Sub