可視化程序設計VB理論二

1、實驗二總結 Picturebox 和和 image 的使用方法的使用方法 height ,width；scaleheight,scalewidthMain()int n,m,l; n56; m=43; lmn; printf(“L=%dn”,l);Private command1_click()Dim n as integerDim m as integerDim l as integerN=56M=43L=m+nPrint “L=“,lEnd subC程序VB程序不同的編譯系統(tǒng)不同的語法規(guī)則VB語言基礎語言基礎l 編碼基本規(guī)則編碼基本規(guī)則l 數(shù)據(jù)類型、變量與常量數(shù)據(jù)類型、變量與常量l VBV

2、B內部函數(shù)內部函數(shù)l 運算符和表達式運算符和表達式 VBVB將關鍵字中每個單詞的首字母自動轉換成大寫字母將關鍵字中每個單詞的首字母自動轉換成大寫字母。提高了程序的可讀性。提高了程序的可讀性。 對于用戶自定義的變量名、過程名、函數(shù)名，對于用戶自定義的變量名、過程名、函數(shù)名，VBVB以第一次定義的為準以第一次定義的為準，以后輸入的自動轉換成首次的形，以后輸入的自動轉換成首次的形式。式。 1 1、在、在VBVB代碼中，字母不區(qū)分大小寫代碼中，字母不區(qū)分大小寫編碼基本規(guī)則編碼基本規(guī)則2 2、語句書寫自由、語句書寫自由 VB VB 在同一行上可以書寫一條語句或多條語句。如果多條語在同一行上可以書寫一條語

3、句或多條語句。如果多條語句寫在一行上，語句間用冒號句寫在一行上，語句間用冒號“：”隔開。例如：隔開。例如：Form1.width=300Form1.width=300: : Form1.caption= Form1.caption= 您好您好 : :Temp= Form1.widthTemp= Form1.width為了方便閱讀，最好一行寫一條語句。為了方便閱讀，最好一行寫一條語句。 一條語句如果在一行內寫不下，一條語句如果在一行內寫不下，VBVB允許將單行語句分若干行允許將單行語句分若干行書寫，在行后加入續(xù)行符（書寫，在行后加入續(xù)行符（一個空格后面跟一個下劃線一個空格后面跟一個下劃線“ “

4、_”_”。）。）將長語句分成多行。將長語句分成多行。 Addresses = “Addresses = “韓山師范學院韓山師范學院” ” & _ & _ “ “數(shù)學與信息技術系數(shù)學與信息技術系” ” & _ & _ “ “計算機實驗室計算機實驗室” 原則上，續(xù)行符應加在運算符的前后，續(xù)行符不應將變量名原則上，續(xù)行符應加在運算符的前后，續(xù)行符不應將變量名和屬性名分隔在兩行上。和屬性名分隔在兩行上。注釋可以和語句在同一行，并寫在語句的后面，也可占據(jù)一整行。例如：這是從屏幕左邊開始的注釋。Text1.Text = “Hi!” 在文本框中放歡迎詞。3 3、在、在VBVB

5、中可以使用注釋中可以使用注釋注釋有三種情況：注釋有三種情況： 用用RemRem開頭引導注釋行。開頭引導注釋行。 用撇號用撇號“”“”開始引導語句后的注釋。開始引導語句后的注釋。 使用使用“設置設置/ /取消注釋塊取消注釋塊”命令將若干語句行或文字設命令將若干語句行或文字設置置/ / 取消為注釋塊。取消為注釋塊。注意注意: :在同一行內，續(xù)行符之后不能加注釋。在同一行內，續(xù)行符之后不能加注釋。功能：用來標記變量名、函數(shù)名和類型名構成元素：AZ、az、09或下劃線_。形式：以字母或下劃線開始，后跟字母、數(shù)字或下劃線組成的字符串。注意：標識符不能分行書寫。 4 4、VBVB中的標識符中的標識符例如：

6、以下是例如：以下是Visual Basic 6.0Visual Basic 6.0中合法的標識符中合法的標識符DimDim MyStringMyString As StringAs String ConstConst PiPi=3.1415926535897932=3.1415926535897932 Public FunctionPublic Function getValue ()getValue () As Integer As Integer變量名變量名符號常量名符號常量名函數(shù)名函數(shù)名5 5、數(shù)制、數(shù)制 十進制十進制 八進制八進制 十六進制十六進制 9 &o11 &H9

7、 15 &o17 &HF 16 &o20 &H10 20 &o24 &H14 255 &o377 &HFF數(shù)制數(shù)制 主要數(shù)制：主要數(shù)制： 十進制數(shù)，是十進制數(shù)，是VBVB中的默認數(shù)制中的默認數(shù)制輔助數(shù)制：輔助數(shù)制： 八進制數(shù)（八進制數(shù)（&o&o）和十六進制數(shù)（）和十六進制數(shù)（&H&H），）， 個別情況使用，如屏幕和顏色的設置。個別情況使用，如屏幕和顏色的設置。數(shù) 據(jù) 類 型1.數(shù)值型數(shù)值型2.日期型日期型3.邏輯型邏輯型4.字符串型字符串型一、基本數(shù)據(jù)類型1.數(shù)值型(1)整數(shù)整數(shù)整型整型 存儲空間：

8、存儲空間： 2個字節(jié)；個字節(jié)； 取值范圍：取值范圍：-32768+32767 關鍵字：關鍵字： Integer ; 類型符：類型符：% 整型常數(shù)的表示形式整型常數(shù)的表示形式:n% n% 例如：例如：123123，-123,+123,123%-123,+123,123%(2)(2)長整型長整型 存儲空間：存儲空間： 4個字節(jié)；個字節(jié)； 取值范圍：取值范圍：-2147483648+2147483647 關鍵字：關鍵字：Long, Long, 類型符：類型符：& 長整型常數(shù)的表示形式：長整型常數(shù)的表示形式：n n& & 例如：例如：123&, -1234567&

9、;123&, -1234567&(2)浮點數(shù)（實數(shù)）浮點數(shù)（實數(shù)）單精度實型單精度實型 存儲空間：存儲空間：4個字節(jié)；個字節(jié)； 有效數(shù)字位數(shù)：有效數(shù)字位數(shù)：7 數(shù)值范圍：數(shù)值范圍：-1038 1038 負數(shù)范圍：負數(shù)范圍： -3.402823E+38-1.440129E-45 正數(shù)范圍：正數(shù)范圍：1.440129E-45 3.402823E+38 關鍵字：關鍵字： Single, 類型符：類型符：! 表示形式表示形式:n.n!, n.n!, n.nEn.nEm m 例如：例如：123.45123.45，123.45!,0.12345E+3123.45!,0.12345E+31.

10、數(shù)值型雙精度實型雙精度實型 存儲空間：存儲空間：8個字節(jié)個字節(jié); 有效數(shù)字位數(shù)：有效數(shù)字位數(shù)：16 數(shù)值范圍：數(shù)值范圍：-10308 +10308 負數(shù)范圍：負數(shù)范圍： 正數(shù)范圍：正數(shù)范圍： 關鍵字：關鍵字： Double, 類型符：類型符：# 表示形式表示形式:n.nn.n# #, , n.nEn.nEm m# #, , n.nDn.nDm,m, 例如：例如：123.45#123.45#， 0.12345E+3#, 0.12345D+3, 0.12345E+3#, 0.12345D+3, 存儲空間：存儲空間：8個字節(jié)個字節(jié); 表示的日期范圍：公元表示的日期范圍：公元100年年1月月1日日99

11、99年年12月月31日日表示的時間范圍：表示的時間范圍：0:00:0023:59:59常數(shù)表示形一：常數(shù)表示形一： #mm/dd/yyyy#, 常數(shù)表示形式二：常數(shù)表示形式二： #mm-dd-yy # 關鍵字：關鍵字：Date2. 日期型存儲空間：存儲空間：2個字節(jié)個字節(jié); 取值：取值：True, False關鍵字：關鍵字：Boolean3. 邏輯型關鍵字：關鍵字：String常量表示形式：常量表示形式： 空串：空串：字符串中含有字符串中含有時時: 他說：他說：我們合作很愉快我們合作很愉快 。 4. 字符串型5. 對象型對象型(Object) 聲明對象變量后，用聲明對象變量后，用Set語句指定

12、實際引用的對象語句指定實際引用的對象 例，窗體上有命令按鈕例，窗體上有命令按鈕Command1，執(zhí)行如下語句，執(zhí)行如下語句， 可將該按鈕的顯示文字改為可將該按鈕的顯示文字改為OK Dim a As Object 聲明聲明a為對象型變量為對象型變量 Set a = Command1 指定指定a引用引用Command1命令按鈕命令按鈕 a.Caption = “OK” 與與Command1.Caption等價等價6. 變體型變體型(Variant) 變體：在程序運行期間可存放不同類型的數(shù)據(jù)。例：變體：在程序運行期間可存放不同類型的數(shù)據(jù)。例： Dim X X缺省為缺省為 Variant類型類型 X

13、= 17 X被賦予字符串被賦予字符串 17 X = X 2 X被賦予數(shù)值被賦予數(shù)值15 X = A & X X被賦予字符串被賦予字符串 A15 存儲空間：存儲空間：8個字節(jié)個字節(jié)精度：小數(shù)點前精度：小數(shù)點前15位，小數(shù)點后位，小數(shù)點后4位位數(shù)值范圍：數(shù)值范圍： -922377203685477.5808922377203685477.5807關鍵字：關鍵字：Currency 類型符：類型符： 7.貨幣型（定點數(shù)據(jù)類型）表 Visual Basic基本數(shù)據(jù)類型數(shù)據(jù)類型數(shù)據(jù)類型關鍵字關鍵字類型符類型符字節(jié)數(shù)字節(jié)數(shù)前綴前綴范圍范圍字節(jié)字節(jié)Byte無無1bty0255整型整型Integer2i

14、nt-3276832767長整型長整型Long&4lng-21474836482147483647單精度實數(shù)單精度實數(shù)Single！4sng-3.402823E383.402823E38雙精度實數(shù)雙精度實數(shù)Double#8dbl-1.79769313486232E3081.79769313486232E邏輯型邏輯型Boolean無無2blntrue/false字符串型字符串型String$可變可變str長度：長度：065535貨幣型貨幣型Currency8cur-922377203685477.5808922377203685477.5807日期型日期型Date無無8dtm1/1/10

15、012/31/9999對象型對象型Object無無4obj任何對象任何對象變體型變體型Variant無無不固定不固定vnt上述有效范圍之一上述有效范圍之一自定義數(shù)據(jù)類型 在模塊的在模塊的“通用通用”聲明段聲明聲明段聲明 Private | Public Type 數(shù)據(jù)類型名數(shù)據(jù)類型名 元素名元素名1 As 類型名類型名 元素名元素名2 As 類型名類型名 End Type Public：聲明的類型在工程中所有模塊的任何過程中可用：聲明的類型在工程中所有模塊的任何過程中可用Private：聲明的類型只能在當前模塊中使用：聲明的類型只能在當前模塊中使用 聲明自定義數(shù)據(jù)類型后，可使用該類型。例聲明自

16、定義數(shù)據(jù)類型后，可使用該類型。例 Dim studTemp As student 聲明為聲明為student類型變量類型變量訪問自定義數(shù)據(jù)類型的變量：訪問自定義數(shù)據(jù)類型的變量：變量名變量名. .成員名成員名，如：，如： studTemp.id=“030005” studTemp.xm=“李斌李斌” 常量常量常量與變量常量與變量常量：在程序運行中其值不可以改變。常量：在程序運行中其值不可以改變。VBVB主要有兩種常量：主要有兩種常量：直接常量和符號常量直接常量和符號常量1.1.直接常量直接常量以直接明顯的形式給出的各種數(shù)據(jù)以直接明顯的形式給出的各種數(shù)據(jù) 1) 1) 數(shù)值常量數(shù)值常量整數(shù)常量：整數(shù)

17、常量：十進制、八進制（以十進制、八進制（以&O&O開頭）和十六進制（以開頭）和十六進制（以&H 或&h開頭） 長整型常量：長整型常量：十進制、八進制和十六進制形式十進制、八進制和十六進制形式貨幣型常量（即定點數(shù)）、浮點數(shù)貨幣型常量（即定點數(shù)）、浮點數(shù) 2) 字符串常量字符串常量 由除雙引號和回車符之外的由除雙引號和回車符之外的ASCII字符組成的字符串字符組成的字符串 3) 布爾常量布爾常量 真真True, 假假False 4) 日期常量日期常量 兩個兩個“#”符號把日期值括起來表示日期常量符號把日期值括起來表示日期常量 2.2.符號常量符號常量 內部符號常量內

18、部符號常量: 如如VbOKOnly 用戶自定義符號常量用戶自定義符號常量 格式為：格式為：Public | Private Const 常量名常量名As數(shù)據(jù)類型數(shù)據(jù)類型 =表達式表達式 ,常量名常量名As數(shù)據(jù)類型數(shù)據(jù)類型=表達式表達式 例如：例如：Const Pi As Double Double=3.14159265358979 在定義時未指明數(shù)據(jù)類型，則按表達式的結果確定類型在定義時未指明數(shù)據(jù)類型，則按表達式的結果確定類型 Const sss=“你好你好” 字符串型字符串型 同時定義多個符號常量，它們之間要用同時定義多個符號常量，它們之間要用逗號逗號進行分隔進行分隔 允許允許嵌套定義嵌套定

19、義符號常量符號常量 Const Const pi As Double =3.141592653589793 As Double =3.141592653589793 Const yu As Double= Const yu As Double= pi * * 2 2 不允許遞歸不允許遞歸定義符號常量定義符號常量 Public Const A1 = B1 Public Const A1 = B1 * * 2 2 Public Const B1 = A1 / 2 Public Const B1 = A1 / 2 關鍵字（關鍵字（Public或或Private）有效范圍：局部常量、模塊常量、全局常量

20、有效范圍：局部常量、模塊常量、全局常量a a：在過程內部（事件過程或通用過程）定義的常量，：在過程內部（事件過程或通用過程）定義的常量，有效范圍只能局限于本過程內部有效范圍只能局限于本過程內部直接用直接用Const關鍵字定關鍵字定義義 b b：在模塊（窗體模塊或標準模塊）中用：在模塊（窗體模塊或標準模塊）中用Private關鍵字關鍵字定義后定義后, ,對該模塊中所有過程都有效對該模塊中所有過程都有效c c：在標準模塊中用：在標準模塊中用PublicPublic關鍵字關鍵字定義的符號常量在整定義的符號常量在整個應用程序中的所有過程和模塊內都有效個應用程序中的所有過程和模塊內都有效 變量變量的命名

21、規(guī)則變量的命名規(guī)則1) 變量名必須以字母或漢字開頭，所有字母不分大小寫。變量名必須以字母或漢字開頭，所有字母不分大小寫。2) 不能包含圓點不能包含圓點“.”。3) 字符總個數(shù)不得超過字符總個數(shù)不得超過255個字符。個字符。4) 在同一個范圍內必須是惟一的。在同一個范圍內必須是惟一的。 5) 不能用不能用 Visual Basic的關鍵字作為變量名。如：的關鍵字作為變量名。如：Print6) 變量名不能與過程名和符號常量名相同。變量名不能與過程名和符號常量名相同。1. 變量的聲明變量的聲明通過類型符號：直接在變量名后面加上類型符號通過類型符號：直接在變量名后面加上類型符號 S& = 10

22、 聲明聲明S為長整型變量為長整型變量 使用聲明語句使用聲明語句 Dim 變量名變量名 As 類型類型 Dim 變量名變量名 類型符類型符 例如，下面兩條聲明語句的效果相同：例如，下面兩條聲明語句的效果相同： Dim a As Integer , b As Long , c As Single , d As Double Dim a% , b& , c！,d# 若省略類型說明，被聲明的變量為若省略類型說明，被聲明的變量為Variant型。例如：型。例如： Dim a,b a和和b均為變體型變量均為變體型變量 Dim S1,S2 As String*6 S1為變體型變量為變體型變量,S2為

23、定長字符串為定長字符串 2. 變量的隱式及顯式聲明變量的隱式及顯式聲明不聲明就用的變量被隱式聲明為不聲明就用的變量被隱式聲明為Variant，初值，初值Empty 強制進行變量的顯式聲明強制進行變量的顯式聲明 “通用通用”聲明段中加上語句：聲明段中加上語句： Option Explicit “工具工具選項選項”“編輯器編輯器” ” 對新模塊起作用對新模塊起作用遇到未經(jīng)聲明的變遇到未經(jīng)聲明的變量包括輸錯的變量，量包括輸錯的變量，系統(tǒng)會發(fā)出錯誤警系統(tǒng)會發(fā)出錯誤警告告 3. 變量的有效范圍變量的有效范圍 (1) 局部變量局部變量：在一個：在一個過程內部聲明過程內部聲明的變量的變量 有效范圍限于聲明它

24、的過程有效范圍限于聲明它的過程 自動變量：自動變量：用用Dim聲明，聲明，變量值只在過程執(zhí)行期間才存在變量值只在過程執(zhí)行期間才存在 靜態(tài)變量：用靜態(tài)變量：用Static聲明，聲明，變量值在程序運行期間一直存在變量值在程序運行期間一直存在 例例:統(tǒng)計單擊窗體的次數(shù)統(tǒng)計單擊窗體的次數(shù) Private Sub Form_Click() Static intCount As Integer intCount = intCount+1 Print intCount End Sub 單擊窗體單擊窗體3 次次 將將Static改為改為Dim (2) 模塊變量：模塊變量：“通用通用”聲明段用聲明段用Private或或Dim語句聲明語句聲明 可被該模塊中的任何過程所訪問可被該模塊中的任何過程所訪問 Private a As Integer, b As Integer 聲明模塊變量聲明模塊變量 Private Sub Command1_Click() Dim intTemp As Integer 聲明局部變量聲明局部變量 a = 10 : b = 20 Print a和和b內容交換前：內容交換前：; a; b intTemp = a: a = b: b = intTemp 變量交換變量交換 End Su