有一个文本信息是每次调用程序是都要打开的。

开始我的办法是打开对话框的办法读入文件的。
Dim nextline As String
Dim fname As String
CommonDialog1.ShowOpen
fname = CommonDialog1.FileName
If fname <> "" Then
Open fname For Input As #1
List1.Clear
Do Until EOF(1)
Line Input #1, nextline
If nextline <> vbNullString Then
List1.AddItem nextline
End If
Loop
Close #1
End If

但是我觉得没次调用程序都要同过对话框打开文件很麻烦。
请问有什么办法可以当我没次调用程序时都可以自动加载那个文本信息
最好是随机性的（就是，无论我把那个文本文件放在那个盘里都能自动读取那个文件）

如果不行的话，指定路径性的也可以！（就是我把那个文本文件放在一个固定的路径。每次调用程序时，加载该个路径里的那个文本文件）

实在想不到办法~~望高手帮忙赐教！

[此贴子已经被作者于2007-8-29 22:14:48编辑过]

呵呵，这个可以成功了，
但之前我是试过这样去修改的。但没有显示数据。难道我是输错了路径。
就是谢谢斑竹与大家的热心帮助！

充心感谢~~

谢谢multiple19O2斑竹的热心帮助!

请问multiple19O2斑竹，相对路径是如何理解呢？

就是如有个变量那样，可能每个时期都可能不一样。

就如不一样的路径，加载不一样的信息吗？