看这两句代码？

Question

Private Sub cmdjiaojuan_Click()
    Dim stxt As String
    Dim re
    Dim st As String
    Dim filenumber
    st = App.Path & "\acmm\" & cbjj.Text & ".txt"   '注释cbjj.Text，是组合框的内容
    filenumber = FreeFile
    Open st For Input As #filenumber
    While Not EOF(filenumber)
        Line Input #filenumber, re
        stxt = stxt & re & vbCrLf
    Wend
    Close #filenumber
    msgbox stxt
End Sub问题如下：：
当执行到文件open时，报错说 错误的 文件名或号码，但是将cbjj.Text，改为连接的字符串错误消失，请问这是怎么回事啊？谢谢！

Answer 1

可能是组合框内容有问题吧
换成trim(cbjj.text)试试，去除空格

Answer 2

必须存在App.Path & "\acmm\" & cbjj.Text & ".txt"这个文件，否则就会出错。

Answer 3

在Open st For Input As #filenumber之前加上一句debug.print st，看看你得到的这个st是什么值，有利于你找出错误的原因。

Answer 4

文件也存在，放在了C:\计算机考试\acmm\laksdjfie.txt 如果把上面的字符串放上去就没事
这道地 是怎么回事呢！

Answer 5

App.Path 不是 "C:\计算机考试"？

Answer 6

很简单，你只要在filenumber = FreeFile这一句上加一个断点，就可以知道你前面那一句到底是怎么回事了。
在DEBUG窗口中打
？ st 
就可以看到到底变量里面是什么了。这个问题很明显，一定是你的程序出错了。要学会调试哦。

Answer 7

调试n遍,都能找到文件但是就是打不开可以得到变量 st 的内容与实际路径相同,用实际路径可以
已换成变量就挂……

Answer 8

各位大哥好多谢各位帮小弟解决小题，这个小问题小弟在各位大哥的帮助下解决，不知为什么
多出了换行符，现在只是能将其去掉，可为什么会出现，小弟还不太明白如果各位大哥手头不是很忙，就在帮小弟想想，'注释cbjj.Text，是组合框的内容