BAI GIANG VB4

Design: NGuyễn Hiền Du
tổ CHứC Và đIềU khiển tập tin
1 Các lệnh về tập tin
Có sáu lệnh được thống kê trong b?ng sau:
Design: NGuyễn Hiền Du
2 Các hàm điều khiển tập tin
Hàm FileCopy
Dùng để chép một tệp từ đường dẫn nguồn sang một đường dẫn khác. hàm nay không dùng ký tự đại diện
Cú pháp:
FileCopy source, destination
ví dụ:
Private Sub Command1_Click()
VBA.MkDir "D:vietnam"
VBA.FileCopy "D:vb3.ppt", "D:vietnamai3.ppt"
End Sub
Design: NGuyễn Hiền Du
Hàm FileDateTime
Hàm này tr? về ngày giờ đã tạo ra tập tin hoặc lần sửa đổi mới nhất. Cú pháp là:
FileDateTime(PathName)
Private Sub Command1_Click()
MsgBox VBA.FileDateTime("D:vietnamai3.ppt")
End Sub
Hàm GetAttr
Hàm GetAttr tr? về một số nguyên. Cú pháp của hàm này là:
GetAttr(PathName)
Design: NGuyễn Hiền Du
B?ng sau tóm tắt các giá trị này dưới dạng các hằng ký hiệu.
Design: NGuyễn Hiền Du
Hàm SetAttr
Hàm SetAttr ấn định thuộc tính cho tập tin. Cú pháp của hàm này là:
SetAttr PathName, Attributes
các hằng ký hiệu du?c dựng trong b?ng trên
ví d?:
Private Sub Command1_Click()
VBA.SetAttr "d:vb3.ppt", vbHidden
End Sub
Design: NGuyễn Hiền Du
3 Tập tin van b?n
Tập tin van b?n là kiểu tập tin cơ b?n nhất, chúng lưu gi? van b?n mà chúng ta đọc được. Có thể dùng Notepad để xem một tập tin van b?n
Ta chỉ nên dùng tập tin van b?n khi biết rõ:�
Sẽ không thay đổi trong tập tin
Thông tin được xử lý từ đầu đến cuối (tuần tự)
Có thể bổ sung vào cuối tập tin
l?nh tạo t?p tin:
Cú pháp:
Open For Output as #Num
Trong đó
là đường dẫn và tệp tin cần mở
Num là chỉ số tệp tin mà bộ nhớ cần qu?n lý
Design: NGuyễn Hiền Du
Ví dụ: để mở tệp tin “D:vanban.txt
OPEN “D:Vanban.txt” FOR OUTPUT AS # 1
Më tÖp cã tªn Vanban.txt ®Ó lÊy dữ liÖu ®­a vµo RAM theo “kªnh” 1
Để đãng tệp:
Có ph¸p
Close #Num
vÝ dô:
Close # 1
Để ghi dữ liệu lªn tÖp tin
Có ph¸p: Print #Num ,
vÝ dô:
Print #1,“Cong nghe thong tin”
Design: NGuyễn Hiền Du
Mở tập tin
Cú pháp:
OPEN FOR INPUT AS # Num
ví dụ:
OPEN "D:vn.txt FOR INPUT AS #1
Để đọc dữ liệu từ tệp tin
Cú pháp:
Input #Num ,
ví dụ:
INPUT #1,ST
Bổ sung d? liệu vào sau tập tin
Cú pháp:
OPEN FOR Append AS #num
Design: NGuyễn Hiền Du
Một số hàm đi kèm với tệp tin
FreeFile: lấy ra số hiệu tệp tin rỗi
EOF(): trả về kết quả là đúng khi cuối tệp tin
LOF(): cho biết độ dài của tệp tin
Chú ý:
Ta có thể dùng lệnh WRITE để ghi nội dung lên tệp tin giống như lệnh Print
Design: NGuyễn Hiền Du
4 RichTextBox và tập tin
Phương pháp LoadFile
Phương pháp LoadFile dùng để nạp một tập tin .rtf hoặc tập tin van b?n vào điều khiển RichTextBox.
Cú pháp như sau:
NameOfRichTextBox.LoadFile(PathName, FileType)
PathName là đường dẫn và tên của tập tin muốn nạp
Tham số FileType là 0 ứng với tập tin .rtf , là 1 ứng với tập tin van b?n.
Design: NGuyễn Hiền Du
Phương pháp SaveFile
Lưu nội dung của điều khiển RichTextBox ra một tập tin.
Cú pháp:
NameOfRichTextBox.SaveFile(PathName,FileType)
5. Các tập tin truy cập ngẫu nhiên
Tập tin truy cập ngẫu nhiên không cần phải chi định mở hay tạo ra. Do vây ta chi cần một cú pháp sau:
Open For Random As #NUM Len = Maxlen
- Maxlen: là giới han mẩu tin có thể lưu được
- NUM: là chỉ số tệp tin
Design: NGuyễn Hiền Du
Để ghi lên tệp tin ngẫu nhiên ta dùng lệnh: PUT theo cấu truc sau:
PUT #NUM,
ví dụ: PUT #2, I ,"Nguyen anh","Nam"
Để đọc dữ liệu từ tệp tin ngẫu nhiên ta dùng lệnh GET theo cú pháp:
GET #NUM,
ví dụ:
GET #2, I, HT,GT
Để kiểm tra độ dài của bản ghi ta dùng lệnh LEN
Design: NGuyễn Hiền Du
6 Tập tin nhị phân
tập tin nhị phân cho phép ta đọc hoặc thay đổi bất kỳ byte nào của một tập tin. Chúng là nh?ng công cụ rất mạnh.
Cú pháp:
Open FileName For Binary As # FileNum