Question

vb的open语句求教

Open App.PATH + "\" + "次数" + T + ".TXT" For Input As #1 这句话老是不对啊，怎么办。我在app.path下建立了一个“次数1”.txt和一个“次数2”.txt.可运行时老是提示“找不到路径”，小弟求教高手

Answer 1

T赋值以后：用
Open App.PATH + "\" + "次数" & T & ".TXT" For Input As #1
Open App.PATH + "\" + "次数" + cstr(T) + ".TXT" For Input As #1
Open App.PATH + "\" & "次数" & cstr(T) & ".TXT" For Input As #1
都可以，字符串的连接尽量用 & ，而且对于数值型变量也尽量使用转换函数转换以后再做连接，这是一种良好的编程习惯。

Answer 2

Open App.PATH & "\次数" & T & ".TXT" For Input As #1

Answer 3

改为：Open App.PATH "\" & "次数" & T & ".TXT" For Input As #1试试看。

Answer 4

可以加个dir函数来测试文件是否存在 确保建立的 次数1.txt 文件名没有引号
Dim StrP As String
StrP = App.Path + "\" + "次数" + T + ".TXT"
MsgBox StrP
If Dir(StrP) <> "" Then
Open StrP For Input As #1

Close #1
End If

Answer 5

文件名说明错啦！
改为：Open App.PATH + "\" + "次数" + “1” + ".TXT" For Input As #1
为了调试方便，我建议你可以先声明一个变量，然后将文件名赋值给变量，再打开变量。
dim strFileName as string
strFileName=App.Path & "\" & "次数" & "1" & ".txt"
open strFileName for input as #1
然后对strFileName查看就好了！