在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显示一行内容。最后关闭文件并释放对象。
