วิธีใช้ Dir $ ใน VB6

ภาษาการเขียนโปรแกรม Visual Basic ยังคงมีการใช้งานบางอย่างในการเขียนโปรแกรมและการพัฒนาแอปพลิเคชั่นที่ทันสมัยและดังนั้นคุณอาจพบว่าตัวเองขุดเข้าไปในรูปแบบของมัน การใช้ฟังก์ชัน Dir $ ช่วยให้คุณสามารถดูว่าการค้นหาไฟล์และโฟลเดอร์ทำได้อย่างง่ายดายผ่าน VB6 ได้อย่างไร

1

ใช้ฟังก์ชัน Dir $ เพื่อตรวจสอบว่ามีไฟล์อยู่หรือไม่ หากไฟล์ไม่มีอยู่ฟังก์ชันจะส่งคืนสตริงว่าง รหัสต่อไปนี้กำหนดว่าไฟล์ "example.txt" มีอยู่ในไดเรกทอรี C: หรือไม่:

ถ้า Dir $ ("C: \ example.txt") = "" จากนั้น Msgbox "ไม่อยู่ที่นี่!" อื่น Msgbox "ที่นี่" สิ้นสุดถ้า

2

ใช้ Dir $ เพื่อตรวจสอบว่ามีไดเรกทอรีอยู่หรือไม่ คำสั่งนี้เหมือนกับคำสั่งที่ตรวจสอบว่ามีไฟล์อยู่หรือไม่ แต่ต้องการการใช้อาร์กิวเมนต์เพิ่มเติม "vbDirectory" ในการเรียกใช้ฟังก์ชัน โค้ดตัวอย่างนี้ตรวจสอบการมีอยู่ของโฟลเดอร์ชื่อ "ตัวอย่าง" ในพาร์ติชัน C:

ถ้า Dir $ ("C: \ example", vbDirectory) = "" จากนั้น Msgbox "ไม่อยู่ที่นี่!" อื่น Msgbox "ที่นี่" สิ้นสุดถ้า

3

ใช้ Dir $ เพื่อแสดงเนื้อหาของไดเรกทอรี หากคุณรู้ว่ามีไดเรกทอรีอยู่คุณสามารถใช้ Dir $ เพื่อแสดงรายการไฟล์ภายในไดเรกทอรีนั้น การใช้ตัวแปรชื่อ "name" ให้ใช้ Dir $ พร้อมกับลูป Do-while เพื่อดึงชื่อของแต่ละไฟล์ในไดเรกทอรีที่มีนามสกุลไฟล์. txt:

ชื่อ Dim เป็น As String

name = Dir $ ("C: \ example * .txt") ทำจนกระทั่งชื่อ = "" ชื่อพิมพ์ = Dir $ () วนซ้ำ

โพสต์ยอดนิยม