在VB中打开指定文件可以使用FileSystemObject对象的OpenTextFile方法。以下是一个示例代码：

Dim fs As ObjectDim file As ObjectSet fs = CreateObject("Scripting.FileSystemObject")Set file = fs.OpenTextFile("C:\path\to\file.txt", 1)Do While Not file.AtEndOfStreamMsgBox file.ReadLineLoopfile.CloseSet file = NothingSet fs = Nothing

在上面的代码中，首先创建了一个FileSystemObject对象fs，然后使用OpenTextFile方法打开了指定的文件。接着使用Do While循环读取文件内容，并在每次循环中使用MsgBox显示一行内容。最后关闭文件并释放对象。