我用VB正在編寫一個代碼，老是運行不了，求教

xiongmaoren

最近我用VB在編寫一個點菜系統，到讀入caidan.txt文件時的代碼如下。到運行時提示 編譯錯誤，變量未定義，求教大神如何調試或者如何改寫代碼，萬分感謝啊?。。〖奔奔保。?！另附caidan.txt文件圖

zsdwx

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

bbtfcjy

fileno定義了嗎？是全局變量還是？
$ @5 T- b4 A( X# X" h" i) [

xiongmaoren

zsdwx 發表于 2015-6-22 08:45
$ M& k. c- I' f, @" l* S  ~程序中“i ”是整型變量，但第2行中 “Dim i as string”

重新編寫代碼后，運行出現實時錯誤 “53 文件未找到” 。改變路徑后又出現 “52 錯誤的文件名或號碼”如下。源代碼如下。怎么整啊  

xiongmaoren

ngsxngtd 發表于 2015-6-22 09:04
% N" j  J. n7 C9 I  t/ Z注意三個事情：
3 U& @3 O/ i# f) H. q& z. `第一，本意用FreeFile函數獲得未使用的文件號，賦值給fileno。打開文件時使用了“#fileno” ...

我改寫代碼后如下，運行卻找不到文件夾     實時錯誤 ”52 錯誤的文件名或號碼“  “53 文件未找到” 之類的提示，源代碼如下。
& ~8 Y5 j. N. E; m

xiongmaoren

bbtfcjy 發表于 2015-6-22 08:56
fileno定義了嗎？是全局變量還是？

( w8 {2 A  C, J: Q+ L6 }' p& N0 R( c不是全局變量啊
7 g# m$ n9 q+ v5 q$ A
. k* ~* s6 B% H; G* w& H4 W
4 B. @% O0 @0 g' s6 y