【正文】 VB程序設(shè)計(jì)代碼基礎(chǔ) 30 2. 變量的命名遵循標(biāo)識(shí)符的命名規(guī)則，即 ?第一個(gè)字符必須是字母 ?長(zhǎng)度不超過 255個(gè)字符 ?不可以包含小數(shù)點(diǎn)或者 內(nèi)嵌的類型聲明字符 ?不能使用關(guān)鍵字 ?不能與過程名或符號(hào)常量同名 例 : Student1 MyName intMax strName 不區(qū)分大小寫 ；變量名應(yīng)便于識(shí)別、記憶 第三章 VB程序設(shè)計(jì)代碼基礎(chǔ) 31 3. 變量的聲明 (1) 顯式聲明 格式 : Dim|Private|Public| Static 變量名 [As 類型 ] 說明： ?Dim: 在窗體模塊、 標(biāo)準(zhǔn)模塊 或 過程 中聲明變量。 x=0: 產(chǎn)生與最近生成的隨機(jī)數(shù)相同的數(shù)。如果省略，則程序以具有焦點(diǎn)的最小化窗口執(zhí)行。 2. 語(yǔ)句應(yīng)符合一定語(yǔ)法規(guī)則。 ? Timer：返回從午夜開始到現(xiàn)在經(jīng)過的秒數(shù)。 函數(shù)分類 內(nèi)部函數(shù) 用戶自定義函數(shù) 第三章 VB程序設(shè)計(jì)代碼基礎(chǔ) 36 例 : Fix() 結(jié)果為 45 Int() 結(jié)果為 45 Fix() 結(jié)果為 2 Int() 結(jié)果為 3 Abs(4) 結(jié)果為 4 Log(10) 結(jié)果為 Sgn(3) 結(jié)果為 1 Sgn(6) 結(jié)果為 1 Sgn(0) 結(jié)果為 0 例 : 求 sin300 Sin(30 * / 180) 39。 表達(dá)式中不能使用內(nèi)部函數(shù) Const sinx = Sin(20 * / 180) 使用 : 在程序中引用 如 : AREA=Pi*R^2 在程序中不可修改 如 : Pi= 第三章 VB程序設(shè)計(jì)代碼基礎(chǔ) 28 VB內(nèi)部已定義，可以直接使用的常量 查看內(nèi)部常量 : 視圖 → 對(duì)象瀏覽器 → 選擇庫(kù)、類、 成員 如 : 庫(kù) VBRUN 類 ColorConstants ShapeConstants 成員 Vbred vbShapeCircle 例 : Private Sub Form_Activate() Const A As String = 各種常量的使用 = vbGreen = vbRed = 14 Print A End Sub 系統(tǒng)定義符號(hào)常量 第三章 VB程序設(shè)計(jì)代碼基礎(chǔ) 29 變量 ?一個(gè)有名稱的內(nèi)存單元稱為變量。 年齡 End Type 第三章 VB程序設(shè)計(jì)代碼基礎(chǔ) 23 39。 = amp。 例： Public Enum Days Sunday 39。 第三章 VB程序設(shè)計(jì)代碼基礎(chǔ) 11 字符串型數(shù)據(jù) (String) 由雙引號(hào) 括起來的一串符號(hào) 例 : abc ABC 計(jì)算機(jī) 3+2 (空串 ) 如果字符串本身包括雙引號(hào)，可用連續(xù)兩個(gè)雙引號(hào)表示。結(jié)束 范圍 : amp。O177777 十六進(jìn)制表示 : 以 amp。 39。 | 多個(gè)取一表示符。 例如， Sum、 Age、 Average、 stuName等都是合法的標(biāo)識(shí)符。O開頭，以 amp。H1ACamp。 ?常量表達(dá)式：可選項(xiàng)，為各成員所對(duì)應(yīng)的值（為 Long類型），可以是其他的枚舉類型。如果將一個(gè)浮點(diǎn)數(shù)值賦給一個(gè)枚舉中的常量，Visual Basic將該數(shù)值取整為最接近的長(zhǎng)整數(shù)。 3）如果用戶自定義類型的元素為 數(shù)組 ，則需要使用 下標(biāo) 參數(shù)。 電話 End Type Private Type Student Name As String 39。 Num為可變類型 Public Average As Single Static A As Long (2) 隱式聲明 可變類型。 ? WeekDay(d)：返回參數(shù) d中指定的日期是星期幾。：自動(dòng)將兩側(cè)的操作數(shù)作為字符進(jìn)行連接 例 : Hello amp。 123 結(jié)果為 Check123 123 amp。 ? Year(d)：返回年份。 設(shè)在窗體中放置按鈕 Command1和 Command2 Dim a As Integer Private Sub Command1_Click() a = a + 10 Print a End Sub Private Sub Command2_Click() a = a + 15 Print a End Sub 觀察程序運(yùn)行結(jié)果 將 Dim a As Integer放到過程內(nèi)，觀察運(yùn)行結(jié)果。 年齡 TosAddr As Address 39。 第三章 VB程序設(shè)計(jì)代碼基礎(chǔ) 22 引用用戶自定義類型元素的格式： 用戶自定義類型變量名 .元素名 例：定義一個(gè) Students數(shù)據(jù)類型，該類型中的每一個(gè)數(shù)又包含了學(xué)生的 系 、 班級(jí) 、 姓名 、 年齡 信息。 Public Enum WorkDays Sunday = 0 Monday Tuesday Wednesday Thursday Friday Saturday = – 6 Invalid = 1 End Enum 第三章 VB程序設(shè)計(jì)代碼基礎(chǔ) 19 5）聲明枚舉類型后，就可以聲明該枚舉類型的變量，然后使用該變量存儲(chǔ)枚舉常量的數(shù)值。表示該枚舉類型在整個(gè)工程中都是有效的。H38amp。O0amp。 Visual Basic不區(qū)分標(biāo)識(shí)符的大小寫。 { } 括起多個(gè)選擇項(xiàng)。 注意 ： 這些專用符號(hào)和其中的提示，不是語(yǔ)句行或函數(shù)的組成部分，在輸入具體命令或函數(shù)時(shí)，上述符號(hào)均不能作為語(yǔ)句的組成部分。O開頭，由 0~7組成 范圍 : amp。 十六進(jìn)制表示 : 以 amp。 第三章 VB程序設(shè)計(jì)代碼基礎(chǔ) 9 2. 實(shí)數(shù)類型 浮點(diǎn)數(shù)采用 IEEE格式 , 由尾數(shù)及指數(shù)組成 : [+|]?...?[.?... ? ]{E|D} [+|]??? (1) 單精度浮點(diǎn)型 (Single) 以 4個(gè)字節(jié)存儲(chǔ)，可以精確到 7位十進(jìn)制數(shù) 例 : +2 表示 ?102 28E9 表示 28?109 表示 ?1017 (2) 雙精度浮點(diǎn)型 (Double) 以 8個(gè)字節(jié)存儲(chǔ)，可以精確到 16位十進(jìn)制數(shù) +2 表示 ?102 28D9 表示 28?109 表示 ?1017 尾數(shù)部分 指數(shù)部分 e|d 第三章 VB程序設(shè)計(jì)代碼基礎(chǔ) 10 (3) 貨幣型 (Currency) 以 8