VB 错误的文件名或号码
先谢谢大家的关注!
问题是:
open中,如果用字符串变量值("C:\Catia.aptsource")可以正常运行,如果是变量(strFileName1)就出错“ 错误的文件名或号码”
代码:
......
strFileName1 = Chr(34) & InputName & Chr(34)
Debug.Print "strFileName1", strFileName1
strFileName2 = Chr(34) & OutputName & Chr(34)
Debug.Print "strFileName2", strFileName2
intNum = 0
'On Error Resume Next
Open strFileName1 For Input As #lngHandle1
'Open "C:\Catia.aptsource" For Input As #lngHandle1
'On Error GoTo 0
'Debug.Print "XXX", strFileName1
While Not EOF(lngHandle1)
Line Input #lngHandle1, tmp
intNum = intNum + 1
If tmp = "" Then intNum = intNum - 1
Wend
Close #lngHandle1
Open strFileName1 For Input As #lngHandle1
'Open "C:\Catia.aptsource" For Input As #lngHandle1
Open strFileName2 For Output As #2
'Open "C:\Catia.nc" For Output As #2
...... --------------------编程问答-------------------- open InputName for...
就好了,但是前提要保证你的
inputname="C:\Catia.aptsource"
你的困惑是strFileName1 给inputname加上了双引号,这个不用 --------------------编程问答-------------------- strFileName1 = Chr(34) & InputName & Chr(34)
完全没有必要!
strFileName1 = InputName --------------------编程问答--------------------
谢谢大家!我把前面的程序改了后,忘了改这里!!
补充:VB , 基础类