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

xiongmaoren

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

zsdwx

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

bbtfcjy

fileno定义了吗？是全局变量还是？

xiongmaoren

zsdwx 发表于 2015-6-22 08:45
/ v# C7 A2 m- _# h程序中“i ”是整型变量，但第2行中 “Dim i as string”

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

xiongmaoren

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

# k: f, N8 i$ ]3 K. D. G9 M我改写代码后如下，运行却找不到文件夹     实时错误 ”52 错误的文件名或号码“  “53 文件未找到” 之类的提示，源代码如下。
" c! h6 K* ?! P5 L; M

xiongmaoren

bbtfcjy 发表于 2015-6-22 08:56
+ a3 N1 q- j5 {" x5 Wfileno定义了吗？是全局变量还是？

不是全局变量啊
. u; K3 @4 e, d& t# S/ i
$ k- d$ V5 g- L
+ K# A4 E& u4 d: c/ ?3 p# B- l" {