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

xiongmaoren

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

zsdwx

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

bbtfcjy

fileno定義了嗎？是全局變量還是？

xiongmaoren

zsdwx 發表于 2015-6-22 08:45
1 b1 O- G$ s6 }2 J2 [7 N) Y# b程序中“i ”是整型變量，但第2行中 “Dim i as string”

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

xiongmaoren

ngsxngtd 發表于 2015-6-22 09:04
注意三個事情：
第一，本意用FreeFile函數獲得未使用的文件號，賦值給fileno。打開文件時使用了“#fileno” ...

5 C7 q8 w1 w( X我改寫代碼后如下，運行卻找不到文件夾     實時錯誤 ”52 錯誤的文件名或號碼“  “53 文件未找到” 之類的提示，源代碼如下。
3 Y3 V0 C% J( \% E/ I, A

xiongmaoren

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

不是全局變量啊
1 v3 k; {, H8 ~& R1 d
1 S, b2 i& G3 U
, F: Z. f- ]  ]% g& O