2.1 代碼編寫規范

代碼規范在應用程序的開發中起著非常重要的作用，嚴格規范的代碼能夠提高代碼的可讀性、可維護性和可重用性。為了編寫高質量的應用程序，必須從一開始就要注意養成良好的編程習慣。本節將介紹一些約定的代碼編寫規范。

2.1.1 標識符命名規則

為了方便代碼的編寫和增強代碼的可讀性，給代碼中的對象按照一定的規則命名是非常必要的。就像每個人都有自己的名字，程序中每個變量及對象也應該命名為一個唯一的名字以便區分。下面給出具體的命名規則。

· 必須以字母或漢字開頭，可由字母、漢字、數字和下畫線組成。

· 不能包含Visual Basic 6.0語句的關鍵字。例如，不能聲明一個名稱為String的變量。

· 長度不能超過255個字符，控件、窗體、類和模塊命名不能超過40個字符。

· 標識符不區分大小寫。

對于Visual Basic 6.0中常用的一些控件，表2.1中列出了本書約定的命名方式，供讀者參考。當然，讀者也可以按照自己的習慣對變量進行命名。

2.1.2 語句書寫規范

語句的書寫方式也是編寫代碼時要注意的，良好的語句書寫格式能夠讓代碼閱讀起來更加清晰。具體的書寫規則如下。

· 每條語句占一行，一行最多允許有255個字符。

· 在同一行上可以書寫多句語句，但語句之間必須用冒號“：”分隔。

· 若某個語句不能在一行書寫，為了不影響程序的編寫和閱讀。建議在本行后加入“空格”和下畫線“_”組成的續行符。例如，

分行書寫程序語句：

Public Declare Function GetClientRect  Lib "user32" (ByVal hWnd As Long,  _
                                          lpRect As RECT) As Long

2.1.3 程序注釋

程序注釋是對編寫的代碼進行解釋說明。適當的程序注釋能夠增加程序的可讀性，便于程序的編輯、調試和維護。對于初學者來說，應盡量養成對程序進行適當注釋的習慣。對代碼添加注釋的方法如下所示。

· 對于單行注釋，可以“Rem”開頭或者是用單引號“'”開頭引導注釋內容。

· 對于整塊內容的注釋，可以選擇編輯工具欄中的“設置注釋塊”和“解除注釋塊”命令來進行注釋或解除注釋，如圖2.1所示。

以下代碼演示了兩種注釋方式。

01  '用于顯示與ID對應的作者姓名
02  Rem用于顯示與ID對應的作者姓名
03  Public Function ShowName（ByVal ID As Integer）

在代碼的第1行采用了以“'”為開頭的注釋方式；代碼的第2行采用了以“Rem”關鍵字為開頭的注釋方式。讀者可以根據個人喜好采用不同的注釋方式，這里建議用“'”開頭的方式來注釋。

2.1.4 格式化及縮排

代碼書寫中只要遵守語句書寫規則就可以編寫出可以運行的代碼，但是為了方便程序的閱讀應該采用縮進編排格式。用戶可以用“Tab”鍵手工進行縮排，也可以通過編輯工具欄中的“縮進”和“凸出”命令進行編排。為了說明格式化及縮排的重要性，可以比較以下兩段代碼。

沒有采用縮進的格式代碼如下所示。

01  Private Sub cmdClip_Click()
02  '鎖定鼠標移動范圍
03  If cmdClip.Caption = "鎖定鼠標移動" Then
04  ClipMouseToWindow cmdClip.hWnd
05  cmdClip.Caption = "釋放鼠標"
06  Else
07  ClipCursor vbNull
08  cmdClip.Caption = "鎖定鼠標移動"
09  End If
10  End Sub

采用縮進格式的代碼如下所示。

01  Private Sub cmdClip_Click()
02     '鎖定鼠標移動范圍
03     If cmdClip.Caption = "鎖定鼠標移動" Then
04         ClipMouseToWindow cmdClip.hWnd
05         cmdClip.Caption = "釋放鼠標"
06     Else
07         ClipCursor vbNull
08         cmdClip.Caption = "鎖定鼠標移動"
09     End If
10  End Sub

對于沒有采用縮進格式的代碼，只有在逐句地讀完代碼后，才知道代碼想要干什么。而對于采用縮進格式的代碼，很容易從If...Else語句結構中來劃分代碼段，然后判斷整個代碼的意圖。在以后的編程過程中，也應該采用縮進結構編寫代碼。