我用VB正在编写一个代码，老是运行不了，求教

xiongmaoren

最近我用VB在编写一个点菜系统，到读入caidan.txt文件时的代码如下。到运行时提示 编译错误，变量未定义，求教大神如何调试或者如何改写代码，万分感谢啊！！！急急急！！！另附caidan.txt文件图

zsdwx

程序中“i ”是整型变量，但第2行中 “Dim i as string”

bbtfcjy

fileno定义了吗？是全局变量还是？
; F. @, B/ z0 \

xiongmaoren

zsdwx 发表于 2015-6-22 08:45
程序中“i ”是整型变量，但第2行中 “Dim i as string”

重新编写代码后，运行出现实时错误 “53 文件未找到” 。改变路径后又出现 “52 错误的文件名或号码”如下。源代码如下。怎么整啊  

xiongmaoren

ngsxngtd 发表于 2015-6-22 09:04
注意三个事情：
第一，本意用FreeFile函数获得未使用的文件号，赋值给fileno。打开文件时使用了“#fileno” ...

  P" R% \+ _4 a: X我改写代码后如下，运行却找不到文件夹     实时错误 ”52 错误的文件名或号码“  “53 文件未找到” 之类的提示，源代码如下。
, ~6 F$ A5 \6 n) a( T6 H# e$ g! N4 [  [

xiongmaoren

bbtfcjy 发表于 2015-6-22 08:56
0 _4 m. C3 \1 A1 ufileno定义了吗？是全局变量还是？

不是全局变量啊