在VB中打開指定文件可以使用FileSystemObject對象的OpenTextFile方法。以下是一個示例代碼：
Dim fs As Object
Dim file As Object
Set fs = CreateObject("Scripting.FileSystemObject")
Set file = fs.OpenTextFile("C:\path\to\file.txt", 1)
Do While Not file.AtEndOfStream
MsgBox file.ReadLine
Loop
file.Close
Set file = Nothing
Set fs = Nothing
在上面的代碼中，首先創建了一個FileSystemObject對象fs，然后使用OpenTextFile方法打開了指定的文件。接著使用Do While循環讀取文件內容，并在每次循環中使用MsgBox顯示一行內容。最后關閉文件并釋放對象。
