Part05 - VBA 學習第四回 - 程式設計的一些注意事項 ( 繁體 )

~ 上傳‧分享‧網賺 ~

~ 免費上傳空間‧請即申請 Freak Share ~

~ 進入後請點選左上角 注冊 ! ~

~ 聲明事項 ~

如各位想把以下本文章轉貼 , 請記得要注明出處.

本文章之內容為本人之經驗所寫, 絕無抄襲成份, 特此聲明.

由於圖片製作需時, 所以更新會比較慢.

存放圖片的 SHARE A PIC SERVER 可能讀取速度較慢, 請耐心等待.

在第三回的時候 , 你應該學會了如何叫電腦按照你的意思 , 把 EXCEL 報表內的某些數值進行加減乘除的處理 , 當然 , 程式並不可能只能進行加減乘除這麼簡單的功能吧 , 如果只是這麼簡單 , 我們就沒必要學習 VBA 了 , 倒不如拿起一個小小的計算機來計算好了 ~ 對不對 ~

但是當程式的能力在一天一天地被你加強的時候 , 那麼又會代表著什麼呢 ? 對 , 就是我們所編寫的程式碼一天比一天長了 . 如果在程式執行期間出現了計算錯誤 ( 不包括程式碼錯誤 ) , 我們要為程式碼進行修正 , 但是我們的程式已經有上百上千句程式碼了 , 我們又要如何去找設定錯誤的地方出來呢 ?

為了避免這類事情發生 , 所有的程式設計者都會有一個習慣 , 就是在編寫程式碼的期間 , 一面編寫程式 , 一面編寫註解 .

'開始 程序abc
Sub abc()

'本工作表第一頁 [ Worksheets("Sheet1") ] " 的 " 儲存格 A1 [ Range("A1") ] " 的 " 值等於 100 [ Value = "100" ]
Worksheets("Sheet1").Range("A1").Value = "100"

'結束 程序abc
End Sub

如果大家有細心留意 , 這六句程式碼的當中 , 有三句的開頭是有 ' 的 , 這個 ' 就是要告訴電腦 , 這是一句註解 , 是給我自己或者其他程式設計員看的 , 不是給你看的 , 你可以跳過這一句 , 當電腦發現程式碼前面有這個符號 , 就會自動略過 . 在編程的期間 , 電腦還會幫我們自動用不同的顏色標示出來 , 下圖中 , 綠色的程式碼就是在開頭加了 ' , 只要在註解中記錄清楚這段程式碼的意思 , 到真的要找出來修正的時候 , 我們就可以變得更輕鬆了 .


( Pic5_1 )

現在我們再看一看 , 在第三回中所提及過的有加減乘除功能的程式碼 , 在增加註解後 , 閱讀程式碼就變得方便很多了 .


( Pic5_2 )

現在我們只利用一句註解來一組一組的分開來讀 , 是絕對有足夠的方便性來知道程式到底是在做什麼的 , 但是有一個問題 , 假設 , 要處理加減乘除的部份中 , 出現了使用 迴圈 ( For ~ Next 或者 Do ~ Loop Until 或者 If ~ Then ~ Else ) 的地方 , 普通的一句註解根所提供的閱讀方便性就跟本不足夠 , 所以我們就要在排版的時候多花一點心思 , 請看下圖 .


( Pic5_3 )

圖片內明顯地表示了在 For ~ Next 迴圈中間的四句程式碼 , 而在閱讀的同時 , 也明顯地說明了這四句程式碼就是要重複四次的步驟 , 我們只需要在某地方的程式碼前面按幾次 " Tab " 鍵就可以了 , 既簡單又方便閱讀 . 放心吧 , 電腦會明白的 , 不用擔心它看不懂 , 擔心自己所編寫出來的東西有沒有錯好了 .