Cách sử dụng Dir $ trong VB6

Ngôn ngữ lập trình Visual Basic vẫn có một số ứng dụng trong phát triển ứng dụng và lập trình hiện đại và do đó bạn có thể thấy mình đi sâu vào cú pháp của nó để khiến các ứng dụng chuyên nghiệp của công ty bạn hoạt động với các ứng dụng hoặc thư viện mã cũ. Sử dụng hàm Dir $ cho phép bạn dễ dàng xem cách tìm kiếm tệp và thư mục được thực hiện thông qua VB6.

1.

Sử dụng hàm Dir $ để kiểm tra xem một tệp có tồn tại không. Nếu tệp không tồn tại, hàm sẽ trả về một chuỗi rỗng. Đoạn mã sau xác định xem tệp "example.txt" có tồn tại trong thư mục C: hay không:

Nếu Dir $ ("C: \ example.txt") = "" Thì Msgbox "không có ở đây!" Khác Msgbox "ở đây" Kết thúc nếu

2.

Sử dụng Dir $ để kiểm tra nếu một thư mục tồn tại. Lệnh này giống hệt với lệnh kiểm tra xem một tệp có tồn tại hay không, nhưng yêu cầu sử dụng một đối số bổ sung, "vbDirectory" trong lệnh gọi hàm. Mã ví dụ này kiểm tra sự tồn tại của một thư mục có tên "ví dụ" trong phân vùng C:

Nếu Dir $ ("C: \ example", vbDirectory) = "" Thì Msgbox "không có ở đây!" Khác Msgbox "ở đây" Kết thúc nếu

3.

Sử dụng Dir $ để liệt kê nội dung của một thư mục. Nếu bạn biết rằng một thư mục tồn tại, bạn có thể sử dụng Dir $ để liệt kê các tệp trong thư mục đó. Sử dụng biến có tên "name", sử dụng Dir $ cùng với vòng lặp Do-While để kéo tên của từng tệp trong thư mục có phần mở rộng tệp .txt:

Tên Dim dưới dạng Chuỗi

name = Dir $ ("C: \ example * .txt") Do Until name = "" In tên name = Dir $ () Loop