謝謝高手們,指點下,用QASIC判斷DOS一檔案是存在?
uj5u.com熱心網友回復:
dos 東東,老多年不用了uj5u.com熱心網友回復:
if dir("c:\aa.text")<>"" thenmsgbox "檔案已經存在!",48,"提示"
exit sub
end if
uj5u.com熱心網友回復:
dir函式在qb是可以用的。按f1有幫助。uj5u.com熱心網友回復:
現在見到QBASIC這幾個字母都很懷念了。uj5u.com熱心網友回復:
uj5u.com熱心網友回復:
用Open陳述句結合On Error,Open出錯就說明檔案不存在。uj5u.com熱心網友回復:
5樓還能找到軟體(圖片?)啊,1987-1992,92年我多大,都要仔細算算才知道了。我記得里邊有幾個微軟的demo,有一個是貪吃蛇,玩過很多次。uj5u.com熱心網友回復:
樓主的問題2樓是正常方法,5樓算“歪門邪道”
,不過也算另辟蹊徑。就是萬一程式復雜了on error 里再套一個 on error會怎樣?沒試過。
uj5u.com熱心網友回復:
2樓是“正常方法”??
難道你不知道2樓的是VB6或VBA代碼,不能用在 QBASIC 中嗎。
大致“推測”,趙老師的方法應該是對的。
用Input模式打開檔案,檔案不存在就會引起例外。
uj5u.com熱心網友回復:
我覺得這個是“編程構思、規劃”不當造成的問題。
我到目前為止,VB6、VBA代碼也寫過不少了。
如果某函式、程序需要例外處理,那只會在相應的入口處出現一個 On Error Goto ......
一個程序中從不會出現第2個 On Error 陳述句。
uj5u.com熱心網友回復:
是嗎。如果我錯了,很抱歉。因為已經實在是太久沒有用過qbasic了,最后一次好像是2003年做了一個小程式,因為有點特別所以記住了年份。記得再早的時候在apple II basic里還有純粹的goto陳述句,總之都是過去了。倒是樓主如果不是非常必要建議還是放棄qbasic吧,像goto這樣的陳述句是非常不符合現在的編程理念的。
uj5u.com熱心網友回復:
很明顯,趙老濕的做法是標準做法。轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/98199.html
標籤:VB基礎類
