作者fumizuki (小獅子)
看板Visual_Basic
標題Re: [VB6 ] 計算機
時間Sat Jun 11 13:55:10 2005
※ 引述《TrueFeeling (昨日之死)》之銘言:
: ※ 引述《fumizuki (小獅子)》之銘言:
: : 你的問題大概是
: :
: : Eval = Eval(op1) + Eval(op2): Goto EndProc 這一行吧
: :
: : 這是兩行敘述,第一行執行時會去呼叫 Eval,
: : op1 和 op2 那兩個 Eval 都「執行完成」的時候,才會 Goto EndProc
: ^^^^^^^^^^^
: 怎麼樣算是執行完成呢@@"
s 只剩下數值的時候,
Eval 不是會把 s 分割成兩部份嗎? 並且這兩部份不包含中間的運算子,
然後這兩部份會再交給新的 Eval 處理,新的 Eval 一樣會分解,去掉運算子,
再交給新的 Eval 處理...
重複這樣的行為,直到 s 不再包含運算子時,傳回數值,
這裡就算是一個 Eval 的結束了,就是「執行完成」
另一個結束是 分成兩部份的那段程式碼收到了 Eval 傳回的數值後,計算,
然後 Goto EndProc,就是「執行完成」了。
: :
: : 先乘除後加減啊
: :
: : 乘除優先運算,加減最後運算,這數學規則應該知道吧
: 嗯,知道
: :
: : 因為最先進入的程式是最後才會結束的,所以要倒過來,變成加減先處理,再處理乘除
: :
: : 至於乘與除先後順序不會影響結果,加與減也是...
: 可是為什麼乘最高,其他最低呢?
: 我覺得應該是類似這樣吧:
: 最高-次高-低-最低
沒有,你自己試試看就知道
加與減的順序不影響運算的結果
1 + 2 - 3 =
1 + (2 - 3) =
(1 + 2) - 3 =
0
而且數學只說過先乘除後加減,並沒有說要先乘後除,還是先除後乘吧
依照我程式的撰寫,運算順序是除-乘-減-加,把它改成乘-除-加減,結果是一樣的。
(如果會不同的話,就 Orz 了,那我可要好好研究為何會不同...)
: : 前面翻翻程式碼吧
: :
: : 最開頭就寫了個 c = c + 1 了
: 嗯,這個我有看到,想問一下如果不設這個c的話,
: 方程式還可以運作嗎?為什麼?
可以,因為他只是個指標,表示 Eval 被執行了幾次
但是,還有個 c = c - 1,你大概會問為什麼要減 1 吧?
那是
Static c As Integer 的關係,
Static 的目的就是讓 c 這個變數的值一直保存,不要因為 End Function 就消失掉。
正是因為值不會消失,所以如果這次執行了8次 Eval,
下一次再使用的時候,c 的值會是8
我設定每一次離開函數就減去一,是要 c 的值最後會歸零。
下次再使用 Eval 的時候, c 的值就是 0
c = c + 1 後,c 的值就是 1,才能判定 Eval 是第一次被呼叫,
而不是 Eval(op1) 或 Eval(op2) 在做重覆呼叫...
: : 不然你以為是怎麼用@@?
: 我以為輸入和輸出要分開,沒想到你居然把它合在一起
: 嗯嗯,高手高手^^||
: : 呼叫就是這樣子用的@@"
: 嗯,我又學到了一招^^
: : op1 有兩個地方在使用它,兩個地方並不會衝突,用過了後就不再使用了...
新手的時候的我,也會用一大堆變數,
但後來看看程式碼,會發現,有些變數可以去掉,
不過也要看情況,相同性質的才共用變數,不同性質的千萬不要這樣做
因為很容易用錯變數,或變數相衝突...
程式碼精簡一點,以後比較好管理
不然常看不懂自己在寫些什麼 ( ′-`)y-~
--
VB 程式設計 倉木麻衣 PTT 星爺板 行列輸入法
======================================================
Visual_Basic MaiKuraki Stephen Array
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 210.58.156.43