假如你要用软件目录下的1.txt,就这样 open app.path & "\1.txt" for input as #1
VB6之前的版本是 app.path & "\文件名" .net版是 Application.StartupPath & "\文件名"