Re: [VB6 ] 計算機
有學過 Goto 嗎？
GoSub 跟 Goto 一樣，無條件跳到指定行，但 GoSub 可以用 Return 回來。
函數名稱=運算式 的意思是傳回一個值。
這個函數(Eval)的流程是
把 s 運算式拆解並運算，先找加號，再找減號，再找乘號，再找除號，
當四個運算子都被消掉後，只剩下數值，直接傳回。 → Eval = Val(s)
例如：(以下紅色的數字代表第幾次執行 Eval，黃色代表傳回值)
原式
00 → "3 + 4 + 5 * 6 - 7"
去除所有空白 Replace(s, " ", "")
01 → "3+4+5*6-7"
找加號，將此運算式分割成前後兩組運算式
兩運算式相加 Eval(op1) + Eval(op2)
01 → "3" + "4+5*6-7"
op1 = "3"
沒有四個運算子，直接傳回
02 → 3
op2 = "4+5*6-7"
找到加號，分割！
03 → "4" + "5*6-7"
op1 = "4"
04 → 4
op2 = "5*6-7"
沒有加號，找到減號，分割！
05 → "5*6" - "7"
減一要改成加負一...>>>>> a - b = a + (-b)
(不這麼做好像一定會有問題...有運算先後順序的問題@@")
05 → "5*6" + "-7"
沒有加號，沒有減號，找到乘號，分割!_!
06 → "5" * "6"
接下來 op1 及 op2 都是數值了
07 → 5
08 → 6
第6次執行的還沒完成...
06 → 5 * 6 = 30
第5次執行的 op2 運算式還沒處理 "-7"
前頭沒有運算元(數字)，所以這個不是減號，視為負號，直接傳回
09 → -7
第5次執行的：op1 = 5 * 6 = 30，op2 = -7
05 → 30 + (-7) = 23
第3次執行的：op1 = 4，op2 = 5*6-7 = 23
03 → 4 + 23 = 27
第1次執行的：op1 = 3，op2 = 4+5*6-7 = 27
01 → 3 + 27 = 30
到此為止，全部都處理完畢了，最後傳回值是30。
vb 有一個偵錯工具列、偵錯功能表，可以利用它，來觀看執行過程。
也有快速鍵
F9 可以設中斷點，當程式執行到那一行會無條件中斷，並用一個顏色顯示中斷的那一行。
當程式中斷的時候，可以按 F5 繼續執行，
當再次遇到之前設的中斷點時，又會中斷執行。
或者在程式中斷的時候，按 F8 執行一行敘述，
在下一行中斷執行(不管下一行有沒有設中斷點)。
在程式中斷的時候，可以把滑鼠游標移到變數的上面，
停留約1秒，會顯示該變數目前的值。
這些偵錯的功能很好用，當你看不懂程式在幹麼的時候，可以用來看流程，
或執行結果有問題，不知道哪一個環節出了問題，也可以用來查看，找到錯誤的地方。
當然，不用 vb 給的工具也能偵錯，用你的頭腦偵錯:p
那是不容易的事 ~.~
頭腦很容易混亂 ~.~
所以工具還是好用:p
哪個語法不知道做什麼的，可以發問，最好找一本書查
去書店翻翻，書本的最後幾頁，或開頭有類似字典一樣的目錄
一些基本的關鍵字(GoSub.Return.For.Next.Do.Loop....等)，都可以輕易查到。
或去 vb 研究小站 http://vb.infoserv.com.tw/
不過他沒有關鍵字的目錄可以查
但是有所有內建函數庫可以查...
※ 引述《TrueFeeling (昨日之死)》之銘言：
: 慘了.都看不懂T.T,
: 能不能解說一下整個思路是怎麼架構的,謝啦
: 還有GoSub,Return這些字我也不知道作用是什麼
: Function我看書上(入門書啦)說,Function裡面的架構:
: 函數名=運算式
: 所以這種Function的寫法我也看不大懂T.T
--
VB 程式設計 倉木麻衣 PTT 星爺板 行列輸入法
======================================================
Visual_Basic MaiKuraki Stephen Array
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 210.58.156.43
討論串 (同標題文章)
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章
