第04章VB語言基礎(4學時)

1、 4.1 VB4.1 VB程序代碼的組織方式程序代碼的組織方式 4.1.1 4.1.1 過程過程 過程：具有特定書寫格式、包含若干可過程：具有特定書寫格式、包含若干可被作為一個整體執(zhí)行的代碼行的一個代被作為一個整體執(zhí)行的代碼行的一個代碼組。碼組。 根據(jù)執(zhí)行的方式分為：根據(jù)執(zhí)行的方式分為： 事件過程事件過程 通用過程通用過程 為窗體及窗體上的各種對象編寫的用來響應由用戶或系統(tǒng)引發(fā)的各種事件的代碼行就是“事件過程” 當指定的事件發(fā)生時，該過程即會被激活執(zhí)行。 私有（private） 代碼框架 一個應用程序中的多個窗體共享一些代碼，或一個窗體內(nèi)不同的事件過程可以共享一些代碼。這些被共享的代碼構(gòu)成的過

2、程稱為“通用過程” 公有的（ public） 4.1.2 4.1.2 模塊模塊 用于將不同類型過程代碼組織到一起而提供的一種結(jié)構(gòu) 窗體模塊 標準模塊 類模塊 應用程序中每個窗體都有一個相對應的窗體模塊。 包含用于處理發(fā)生在窗體中的各個對象的事件過程，而且包含有窗體及窗體中各個控件對象的屬性設置以及相關的說明。 被多個應用程序中多個窗體共享的代碼，組織到“標準模塊”。 保存的是通用過程。 包含用于創(chuàng)建新的對象類的屬性、方法的定義等。語句是組成語句是組成VBVB程序的最基本成分。程序的最基本成分。 語句體語句體 4.2 4.2 代碼的書寫規(guī)則代碼的書寫規(guī)則規(guī)定語句的功能； 有些語句沒有該部分 提供

3、具體說明或具體操作例如：Dim a as Integer a20一條語句作用一條語句作用: :向系統(tǒng)提供必要的信息或規(guī)定系統(tǒng)執(zhí)行某些操作。向系統(tǒng)提供必要的信息或規(guī)定系統(tǒng)執(zhí)行某些操作。1) 代碼不區(qū)分字母的大小寫，如：代碼不區(qū)分字母的大小寫，如：Ab Ab 與與ABAB等效；等效；2)2) 系統(tǒng)對用戶程序代碼進行自動轉(zhuǎn)換；系統(tǒng)對用戶程序代碼進行自動轉(zhuǎn)換； 對于關鍵字，首字母被轉(zhuǎn)換成大寫，其余轉(zhuǎn)換成小寫對于關鍵字，首字母被轉(zhuǎn)換成大寫，其余轉(zhuǎn)換成小寫 對于用戶定義的變量、過程名，以首次定義為準進行轉(zhuǎn)換對于用戶定義的變量、過程名，以首次定義為準進行轉(zhuǎn)換 (1) (1) 續(xù)行：（續(xù)行：（空格空格下劃線字

4、符下劃線字符“_ _”)”) (2) (2) 同一行上書寫多條語句，語句間用冒號同一行上書寫多條語句，語句間用冒號“：”分隔分隔 (3) (3) 一行允許多達一行允許多達10231023個字符個字符 (4) (4) 注釋行注釋行 以 Rem開頭，注釋整行 ； 以注釋符“”引導 注釋內(nèi)容從注釋符開始直到該行結(jié)束 利用“編輯”工具欄的 “設置注釋塊”、“解除注釋塊”來 設置/取消多行注釋。例如：例如： Form1.Print Form1.Print 學好學好VBVB 要多學多練要多學多練 Form1.Hide Form1.Hide Form2.Show Form2.Show Form1.Hide

5、Form1.Hide 將將Form1Form1隱藏隱藏 Print Print F, F, 1717 4.2 4.2 代碼的書寫規(guī)則代碼的書寫規(guī)則 整整 長整長整 單精度單精度 雙精度雙精度 貨幣型貨幣型 字節(jié)型字節(jié)型Integer; Long ; Single; Double; Currency; Byte 4.3.1 4.3.1 數(shù)據(jù)類型數(shù)據(jù)類型整型整型(占2字節(jié)) 表數(shù)范圍：-215-1 215-1，即32768 32767 表示形式： n 或n% %：長整型長整型(占4字節(jié)) 表數(shù)范圍：-231-1 231-1 表示形式：n& & 例如：-120，120 &，120， 120%， 43

6、210，-12345678 &：字節(jié)型(占1字節(jié)) 表數(shù)范圍：0255（無符號） 整整 長整長整 單精度單精度 雙精度雙精度 貨幣型貨幣型 字節(jié)型字節(jié)型Integer; Long ; Single; Double; Currency; Byte 4.3.1 4.3.1 數(shù)據(jù)類型數(shù)據(jù)類型單精度單精度(4字節(jié)字節(jié))- 7個有效位 表示形式：帶小數(shù)點數(shù) 用指數(shù)(E)表示 數(shù)字后面加“！”：雙精度雙精度(8字節(jié)字節(jié)) - 15個有效位 表示形式：用指數(shù)(D)表示 數(shù)字后面加“# ”例：例： -1E2 ，1.2E2 120.0 ，120！ +12345678.例：例： -1D2 ，1.2D2 120#

7、Currency ：貨幣型貨幣型(8字節(jié)字節(jié)) -19個有效位 表示形式：數(shù)字后面加“ ”例：例：120Integer; Long ; Single; Double; Currency; Byte 4.3.1 4.3.1 數(shù)據(jù)類型數(shù)據(jù)類型占占2 2個字節(jié)，只有兩個值個字節(jié)，只有兩個值True (-1)True (-1)False ( 0)False ( 0)表示形式：用雙引號括起來或變量名后加表示形式：用雙引號括起來或變量名后加“$”$”如：如：“Basic”Basic”、“1234”1234”注意：注意： 與與 的區(qū)別的區(qū)別 字符串字符串123abc的表示：的表示： 123abc 123ab

8、c Integer; Long ; Single; Double; Currency; Byte 4.3.1 4.3.1 數(shù)據(jù)類型數(shù)據(jù)類型: :-占用占用8 8個字節(jié)個字節(jié) 表示形式：用用# #號括起來號括起來 如：# #2-14-04 6:10:002-14-04 6:10:00# # 用于邏輯判斷用于邏輯判斷, ,只有兩個值只有兩個值True (-1)True (-1)False ( 0)False ( 0)表示形式：用雙引號括起來或變量名后加表示形式：用雙引號括起來或變量名后加“$”$”: :萬能型萬能型 是一種通用的、可變的數(shù)據(jù)類型是一種通用的、可變的數(shù)據(jù)類型 隱含變量的類型隱含變量的

9、類型用于保存任何對象的引用用于保存任何對象的引用 舉例舉例: re, my data, re.er,8re,: re, my data, re.er,8re,工資工資,Integer,Integer intSum intSum 引例引例：解方程解方程 3 3x x2 2+25x+11=0+25x+11=0 設：設：a=3,b=25,c=11a=3,b=25,c=11，則上述方程變?yōu)?，則上述方程變?yōu)閍xax2 2+bx+c=0+bx+c=0 規(guī)則規(guī)則： 變量或常量名必須以變量或常量名必須以字母或漢字開頭；字母或漢字開頭； 由字母、漢字、數(shù)字、下劃線組成；由字母、漢字、數(shù)字、下劃線組成； 長度不超

10、過長度不超過255255個字符；個字符； 在在VBVB中變量名的字母不區(qū)分大小寫；中變量名的字母不區(qū)分大小寫； 不要與關鍵字同名不要與關鍵字同名(Dim,string(Dim,string等）等） 為了提高程序的可讀性，在變量名可加前一約定的前綴為了提高程序的可讀性，在變量名可加前一約定的前綴 Int Int、lnglng、sngsng、dbldbl、blnbln、curcur、dtdt、strstr、vntvnt、bytbyt 4.3.2 4.3.2 變量變量/ /常量的命名規(guī)則常量的命名規(guī)則例例2:2: Dim A As String Dim B As String * 5 A=Visua

11、l Basic B=Visual Basic Print A , B聲明變量的目的聲明變量的目的：根據(jù)聲明的類型決定系統(tǒng)為它分配的存儲單元。：根據(jù)聲明的類型決定系統(tǒng)為它分配的存儲單元。 例例1:1: Dim A Dim B As Long Dim C As Single Dim D As Integer Public|Private|Dim|Static 變量名變量名 AS 數(shù)據(jù)類型數(shù)據(jù)類型 4.3.3 4.3.3 變量變量變量：在程序的運行過程中其值可以變化的量變量：在程序的運行過程中其值可以變化的量等同于：等同于： Dim A, B As Long , C As Single , D As

12、 Integer 或或 ： Dim A, B& , C! , D % 數(shù)值型數(shù)值型字符型字符型布爾型布爾型對象型對象型萬能型萬能型變長字符變量：約20億個字符定長字符變量：約65400個字符Private Sub Form_Click() Dim a As Integer, b As Long Dim c As Single, Dim d As Double a = 327699999 b = 327699999 Print a, b c = 100 / 3 d = 200/ 3 Print c, dEnd SubPrivate Sub Form_Click() Dim a As Boolea

13、n, b As Boolean Dim e, f As Date a = True b = False Print a, b e = #3/1/99 9:12:02 # Print eEnd Sub注意注意: : (1)(1)在在VBVB中一個漢字與一個西文字符視為一樣中一個漢字與一個西文字符視為一樣, ,算一個字算一個字 (2)(2)在窗體和類模塊中在窗體和類模塊中, ,不能用不能用PublicPublic定義定長字符串變量定義定長字符串變量例：例：Private sub command1_click() Dim i as integer Static j as integer i=i+1

14、j=j+1 Print i,jend sub連續(xù)連續(xù)3次單擊次單擊command1 ，分析輸出結(jié)果分析輸出結(jié)果生命變量的目的生命變量的目的：根據(jù)聲明的類型決定分配的存儲單元。：根據(jù)聲明的類型決定分配的存儲單元。 Public|Private|Dim|Static 變量名變量名 AS 數(shù)據(jù)類型數(shù)據(jù)類型 4.3.3 4.3.3 變量變量變量：在程序的運行過程中其值可以變化的量變量：在程序的運行過程中其值可以變化的量 Dim與與Static的區(qū)別：的區(qū)別：區(qū)別作用范圍作用范圍定義方法定義位置局部變量當前過程Dim|Static在過程內(nèi)窗體/模塊變量當前窗體或模塊中的所有過程Private|Dim在窗

15、體或模塊的聲明部分全局變量工程內(nèi)的所有過程Public在窗體或模塊的聲明部分是是指使用指使用的的變量未用聲明語句進行聲明而變量未用聲明語句進行聲明而直接使用直接使用 未聲明直接使用的變量均默認為未聲明直接使用的變量均默認為VariantVariant型型 也可在變量名后加一個規(guī)定數(shù)據(jù)類型的說明符加以說明也可在變量名后加一個規(guī)定數(shù)據(jù)類型的說明符加以說明(1)(1)作用：作用：強制顯式聲明變量。強制顯式聲明變量。 即使用任何一個變量必須即使用任何一個變量必須“先聲明先聲明, ,后使用后使用”(2)(2)增加增加Option ExplicitOption Explicit語句的方法：語句的方法： 在

16、代碼編輯器的通用在代碼編輯器的通用/ /聲明部分輸入：聲明部分輸入：Option ExplicitOption Explicit “ “工具工具| |選項選項”-“-“編輯器編輯器”-選選“要求變量聲明要求變量聲明”項項 例：Dim Str1 As String Str1 = 計算機程序設計 Str2 = 計算機程序設計 Str3% 123 Print Str1, Str2, Str3 4.3.3 4.3.3 變量變量例：Dim T001 As String T001 = 計算機程序設計 Print T00l觀察該程序段的輸出結(jié)果結(jié)果：無輸出結(jié)果： 格式格式：Public|PrivateCon

17、st Const 常量名常量名 As As 類型類型 表達式表達式常數(shù)和運算符組成常數(shù)和運算符組成 常數(shù)值。其數(shù)值直接反映了類型常數(shù)值。其數(shù)值直接反映了類型： 在程序中，常量比變量運行速度快在程序中，常量比變量運行速度快 常量只能出現(xiàn)在賦值號的右邊常量只能出現(xiàn)在賦值號的右邊常量常量：在程序運行期間值不能改變的量：在程序運行期間值不能改變的量 應用程序和控件提供的系統(tǒng)定義的常量應用程序和控件提供的系統(tǒng)定義的常量 例：例：vbRedvbRed代表代表“紅色紅色”等等例如：例如：+120，120 ，1.2E2， 程序設計程序設計 4.3.4 4.3.4 常常 量量 在一行中可放置多個常數(shù)說明在一行中

18、可放置多個常數(shù)說明, ,可用逗號分隔可用逗號分隔例：例：Private Const Pi As Single = 3.14159, str$ = VBPrivate Const Pi As Single = 3.14159, str$ = VB包括：包括：(乘方乘方) )、-(-(負號負號) )、/ / * * 、(整除整除) MOD) MOD、+ -+ -表達式表達式: : (-5) 2 + 5 Mod 3包括：包括：+ + 、 & &表達式表達式:“123”+“3”:“123”+“3” A B A+B A& B+B A& B “123” “3” “1233” “1233” “123” 3

19、126 “1233” 123 3 126 “1233” “123a” 3 出錯 “123a3” 包括包括: , = , , = ,= , , =, , =, 表達式表達式: 15+23 4: 15+23 西文字符西文字符運算結(jié)果是運算結(jié)果是邏輯邏輯值值=False包括：包括：+ - + - 、MODMOD、(整除整除) )、/ / * * 、-(-(負號負號) )、(乘方乘方) ) 表達式表達式: : (-5) 2 + 5 Mod 3包括：包括：+ + 、 & &表達式表達式:“123”+“3”:“123”+“3”包括包括: , = , , = ,= , , =,Like,Is , =,Lik

20、e,Is 包括：包括：And And 、OrOr、NotNot、XorXor. .表達式表達式: 15+234: 15+23=265 OR (C180 and C290 and C390)優(yōu)先級的比較優(yōu)先級的比較 1.1.幾大類比較幾大類比較 優(yōu)先級優(yōu)先級: 高高-低低2.2.算術運算符算術運算符3.3.比較運算符比較運算符4.4.邏輯運算符邏輯運算符算術、算術、 連接、比較、邏輯連接、比較、邏輯 ，- - ，( (* * /) /)， ，MODMOD，(+ -)(+ -)同一級同一級NotNot、 And And 、OrOr、XorXor、 4.4.1 4.4.1 運算符運算符 包含：變量、

21、常量、運算符、函數(shù)和小括號包含：變量、常量、運算符、函數(shù)和小括號 表達式結(jié)果：表達式結(jié)果： 與數(shù)據(jù)和運算符有關與數(shù)據(jù)和運算符有關 乘號不能省略乘號不能省略 括號必須成對出現(xiàn)括號必須成對出現(xiàn) 一個表達式在同一行上書寫，沒有高低、大小區(qū)分一個表達式在同一行上書寫，沒有高低、大小區(qū)分 操作數(shù)的數(shù)據(jù)類型應該符合要求，不同的數(shù)據(jù)應該轉(zhuǎn)換成操作數(shù)的數(shù)據(jù)類型應該符合要求，不同的數(shù)據(jù)應該轉(zhuǎn)換成同一類型。同一類型。 在算術運算中，如果操作數(shù)的數(shù)據(jù)精度不同，在算術運算中，如果操作數(shù)的數(shù)據(jù)精度不同，VBVB規(guī)定運算規(guī)定運算結(jié)果采用精度較高的數(shù)據(jù)類型。結(jié)果采用精度較高的數(shù)據(jù)類型。 4.4.1 4.4.1 運算符運算符

22、 給變量賦值給變量賦值 格式：格式：變量名變量名= =表達式表達式 設置或獲取對象的屬性設置或獲取對象的屬性設置屬性值：設置屬性值： 對象名對象名.屬性屬性= =表達式表達式獲取屬性值：獲取屬性值：變量名對象名變量名對象名. .屬性屬性如如: A=“VB: A=“VB程序設計程序設計” Text1.Text=A Text1.Text=A B BText2.TextText2.Text 4.54.5如如: Dim v As Integer: Dim v As Integer Dim book As String Dim book As String* *8 8 Dim sum As Single

23、 Dim sum As Single v=26 v=26 v=v+1 v=v+1 book=“VB book=“VB程序設計程序設計” ” sum=vsum=v* *123.4+56.7123.4+56.7 Boolean 數(shù)值型True為-1；False為0 Boolean 數(shù)值型 非0為True；0為False 例例: Dim v As Integer: Dim v As Integer Dim book As String Dim book As String* *8 8 Dim sum As Dim sum As DoubleDouble Dim Bool As Boolean Dim

24、 Bool As Boolean v=26 v=26 v=v+12.3 v=v+12.3 sum=v sum=v* *123.4+56.7123.4+56.7 v=“126” v=“126” sum=“123ab” sum=“123ab” v=True v=True sum=False sum=False Bool=123 Bool=123 Bool=0 Bool=0(1) 右邊表達式的值右邊表達式的值強制轉(zhuǎn)強制轉(zhuǎn) 換換成左邊變量的精度成左邊變量的精度(2) 若不能實現(xiàn)類型轉(zhuǎn)換，若不能實現(xiàn)類型轉(zhuǎn)換， 出現(xiàn)出現(xiàn)“類型不匹配類型不匹配”錯錯4.5 4.54.5(1) 右邊表達式的值右邊表達式的值強

25、制轉(zhuǎn)強制轉(zhuǎn) 換換成左邊變量的精度成左邊變量的精度(2) 若不能實現(xiàn)類型轉(zhuǎn)換，若不能實現(xiàn)類型轉(zhuǎn)換， 會會“類型不匹配類型不匹配”錯錯 例例: Dim X As Single: Dim X As Single Dim Y As Single Dim Y As Single Dim Sum As Single Dim Sum As Single X=26 X=26 Sin(X)Sin(X)=X+Y =X+Y 5 5=Sqr(X)+Y=Sqr(X)+Y X+YX+Y=126=126 X=Y=Sum=1 X=Y=Sum=1 Sum=Sum+1 Sum=Sum+1(3) 賦值號賦值號左側(cè)左側(cè)只能出現(xiàn)變量只

26、能出現(xiàn)變量(4) 一條賦值語句不能同時給一條賦值語句不能同時給 多個變量賦值多個變量賦值(5) 正確理解加正確理解加1語句語句。Sum 執(zhí)行了執(zhí)行了N=N+1后后Sum5 6 4.6 4.6 常用內(nèi)部函數(shù)常用內(nèi)部函數(shù) 絕對值：絕對值： Abs(N) Abs(N) e e為底的指數(shù)：為底的指數(shù)：Exp(N)Exp(N) 自然對數(shù)自然對數(shù): Log(N): Log(N) 產(chǎn)生隨機數(shù)產(chǎn)生隨機數(shù): Rnd(N): Rnd(N) 符號函數(shù)符號函數(shù): Sgn(N) : Sgn(N) 平方根平方根: Sqr(N): Sqr(N) 三角函數(shù)三角函數(shù)Sin(N)Sin(N)、Cos(N)Cos(N)、Tan(N

27、):Tan(N):其中的其中的N N必須是弧度值必須是弧度值|-3|- Abs(-3) |-3|- Abs(-3) e e2 2 -Exp(2)-Exp(2) Ln(10) Ln(10) - Log(10)- Log(10) Rnd Rnd 產(chǎn)生一個產(chǎn)生一個0 01 1之間的一個小數(shù)之間的一個小數(shù) 求求2.42.4的符號的符號- Sgn(2.4)- Sgn(2.4)（返回（返回1)1) 求求1616的平方根的平方根- Sqr(16)- Sqr(16)Sin(30Sin(30o o) -Sin(3.14/6) -Sin(3.14/6) 4.6 4.6 常用內(nèi)部函數(shù)常用內(nèi)部函數(shù) 求字串長度求字串長

28、度: Len(C): Len(C) LenB(C) LenB(C) 取子串：取子串：Left(C,N) Left(C,N) Right(C,N) Right(C,N) Mid(C,n1,n2) Mid(C,n1,n2) 查找子串：查找子串：InStr(N1,C1,C2)InStr(N1,C1,C2) 去掉首或尾空格：去掉首或尾空格： LTrim (C) LTrim (C)、RTrim(C)RTrim(C)、Trim(C)Trim(C) 生成字串：生成字串：string(n,”string(n,”字符字符”)”) 生成空格串：生成空格串：space(n)space(n) Left( Left(計

29、算機基礎計算機基礎,2),2)計算計算 Right ( Right (計算機基礎計算機基礎,2,2）基礎）基礎 Mid ( Mid (計算機基礎計算機基礎,2,2，4) 4) 算機基礎算機基礎Len(VBLen(VB程序設計程序設計) 6 ) 6 LenB (VBLenB (VB程序設計程序設計)12?)12?Str= AB CDE Str= AB CDE LTrim (str)LTrim (str)、RTrim(str)RTrim(str)、Trim(str)Trim(str)InStr(4,InStr(4,abdbcdefabdbcdef,d) 6,d) 6String(6,A)Strin

30、g(6,A)Space(10)Space(10) 字符轉(zhuǎn)換成字符轉(zhuǎn)換成ASCIIASCII碼：碼：Asc(C) Asc(C) ASCII ASCII碼轉(zhuǎn)換成字符：碼轉(zhuǎn)換成字符：Chr(N)Chr(N) 轉(zhuǎn)換成小寫字母轉(zhuǎn)換成小寫字母: Lcase(C): Lcase(C) 轉(zhuǎn)換成大寫字母轉(zhuǎn)換成大寫字母: Ucase(C): Ucase(C) 轉(zhuǎn)換成字符轉(zhuǎn)換成字符: Str(N) : Str(N) 轉(zhuǎn)換成數(shù)字轉(zhuǎn)換成數(shù)字: Val(C): Val(C) 轉(zhuǎn)換成字符轉(zhuǎn)換成字符: CStr(N) 取整：直接取整、四舍五入取整、取取整：直接取整、四舍五入取整、取NN的最大整數(shù)的最大整數(shù) Fix(N) Ci

31、nt(N) Int(N) Fix(N) Cint(N) Int(N) Fix( 3.5) Cint( 3.5) Int( 3.5)Fix( 3.5) Cint( 3.5) Int( 3.5) 4.6 4.6 常用內(nèi)部函數(shù)常用內(nèi)部函數(shù)Asc(B) - 66 Asc(B) - 66 Chr(97)Chr(97) -a-aLCase(Abc) - - abcUCase(Abc) - - ABCStr(234) - Str(234) - 234Val(Val(234) - ) - 234CStr(234) - 2343 4 33 4 3-3 -4 -4-3 -4 -4 4.6 4.6 常用內(nèi)部函數(shù)常用

32、內(nèi)部函數(shù) 獲取系統(tǒng)當前日期：獲取系統(tǒng)當前日期：Date Date 獲取系統(tǒng)當前時間獲取系統(tǒng)當前時間: Time: Time 獲取系統(tǒng)當前日期和時間獲取系統(tǒng)當前日期和時間: Now: Now 獲取指定日期年、月、日的值獲取指定日期年、月、日的值:Year(D):Year(D)、Month(D)Month(D)、Day(D)Day(D)如：如：Print datePrint datePrint Time$Print Time$Print NowPrint NowPrint Year(Now),Month(Now),Day(Now)Print Year(Now),Month(Now),Day(Now

33、) 數(shù)值格式符：數(shù)值格式符：0: 0: 顯示一數(shù)字，若此位置沒有數(shù)字則補顯示一數(shù)字，若此位置沒有數(shù)字則補0 0 #: #: 顯示一數(shù)字，若此位置沒有數(shù)字則不顯示顯示一數(shù)字，若此位置沒有數(shù)字則不顯示, , - + $ ( ) :- + $ ( ) :原樣打出原樣打出 4.6 4.6 常用內(nèi)部函數(shù)常用內(nèi)部函數(shù)如：如：Print Format(12.346, +000.00) +012.35Print Format(12.346, +000.00) +012.35 Print Format(12000.346, Print Format(12000.346, #,#.#) 12,000.35#,#.

34、#) 12,000.35注意：注意：Format函數(shù)僅用于控制數(shù)據(jù)的外部輸出格式，不會改變數(shù)據(jù)在計算機內(nèi)部的存儲形式 4.7 InputBox 4.7 InputBox 函數(shù)與函數(shù)與MsgBoxMsgBox函數(shù)函數(shù) InputBoxInputBox函數(shù)函數(shù) MsgboxMsgbox函數(shù)函數(shù)格式：格式：InputBox ( 提示提示 ,標題標題 , 默認值默認值 , X , Y )格式格式：MsgBox ( 提示內(nèi)容提示內(nèi)容 , 按鈕設置按鈕設置 , 標題標題 )： 打開一個對話框打開一個對話框, ,等待用戶輸入內(nèi)容。等待用戶輸入內(nèi)容。 單擊確定，返回輸入值（字符型數(shù)據(jù)）單擊確定，返回輸入值（字

35、符型數(shù)據(jù)） 變量名變量名 = = InputBoxInputBox ( ( 提示提示,標題標題,默認值默認值,X,Y),X,Y)例：設置一個輸入框：例：設置一個輸入框： 提示用戶輸入查詢學號。提示用戶輸入查詢學號。 若提示內(nèi)容中需要換行顯示：若提示內(nèi)容中需要換行顯示：在換行處加在換行處加chr(13)chr(13)和和chr(10)chr(10) 各項參數(shù)位置必須一一對應各項參數(shù)位置必須一一對應 ： 可選可選。整型表達式，缺省值為。整型表達式，缺省值為 0 指定信息框中按鈕指定信息框中按鈕數(shù)目數(shù)目、類型類型、圖標類型圖標類型， 缺省按鈕缺省按鈕等等 變量變量 = = MsgBoxMsgBox(

36、 (提示內(nèi)容提示內(nèi)容,按鈕按鈕,標題標題 ) ) MsgBox MsgBox 提示內(nèi)容提示內(nèi)容 , 按鈕按鈕 , 標題標題 ：必要：必要。字符表達式，即顯示在對話框中的信息。字符表達式，即顯示在對話框中的信息 2.MsgBox 函數(shù)的常用參數(shù)的說明函數(shù)的常用參數(shù)的說明 字符運算符字符運算符 關系運算符關系運算符邏輯運算符邏輯運算符練習練習編制一個帳號與密碼的檢驗程序：編制一個帳號與密碼的檢驗程序：要求：要求： 帳號不超過帳號不超過6 6個數(shù)字，密碼個數(shù)字，密碼4 4個字符（設密碼為個字符（設密碼為VB6)VB6)， 密碼框中不顯示實際輸入字符密碼框中不顯示實際輸入字符 帳號帳號( (如：非數(shù)字

37、如：非數(shù)字) )不正確時，提示有關信息，不正確時，提示有關信息， 并清除原內(nèi)容，得到焦點，再輸入并清除原內(nèi)容，得到焦點，再輸入 密碼不正確時，單擊密碼不正確時，單擊“重試重試”，密碼框清空，得到焦，密碼框清空，得到焦 點重新輸入，若單擊點重新輸入，若單擊“取消取消”，停止運行，停止運行 1.1.下列語句運行時系統(tǒng)給出錯誤提示的是。下列語句運行時系統(tǒng)給出錯誤提示的是。.Print-320-769 .Print-320-769 .PrintIE2+8.PrintIE2+8.PrintAB&128.PrintAB&128 .Print3=2=4.Print3=2=42.2.下面所列四組數(shù)據(jù)中，全部是

38、正確的下面所列四組數(shù)據(jù)中，全部是正確的VBVB常數(shù)是常數(shù)是 。A.32768,1.34D2,ABCDE,&O1767A.32768,1.34D2,ABCDE,&O1767B.3276,123.56,1.2E-2,#True#B.3276,123.56,1.2E-2,#True#C.&HABCE,02-03-2002,False,D-3 C.&HABCE,02-03-2002,False,D-3 D.ABCDE,#02-02-2002#,E-2D.ABCDE,#02-02-2002#,E-23.3.運行下面程序，單擊命令按鈕運行下面程序，單擊命令按鈕Command1,Command1,則立即窗口

39、上顯示的結(jié)果是則立即窗口上顯示的結(jié)果是 。Private Sub Command1_Click()Private Sub Command1_Click() Dim A As Integer,B As Boolean,C As Integer,D As IntegerDim A As Integer,B As Boolean,C As Integer,D As Integer A=20/3 : B=True : C=B : D=A+C A=20/3 : B=True : C=B : D=A+C Debug. Print A, D, A=A + C Debug. Print A, D, A=A +

40、 C End Sub End Sub A. 7 6 FalseA. 7 6 False B. 6.6 5.6 False C. 7 6 A=6 D. 7 B. 6.6 5.6 False C. 7 6 A=6 D. 7 8 A=88 A=8 .PrintIE2+8.PrintIE2+8A.32768,1.34D2,ABCDE,&O1767A.32768,1.34D2,ABCDE,&O1767A. 7 6 FalseA. 7 6 False練練 習習4.4.正確表示命題正確表示命題“A A是一個帶小數(shù)的正數(shù)，且是一個帶小數(shù)的正數(shù)，且 B B是一個帶小數(shù)的負數(shù)是一個帶小數(shù)的負數(shù)”的邏輯表達式是的邏輯表達式是 。5.5.在窗體模塊的通用聲明處有如下語句，會產(chǎn)生錯誤的語句是在窗體模塊的通用聲明處有如下語句，會產(chǎn)生錯誤的語句是 _(1) Const A As Integer=25(1) Const A As Integer=25(2) Public St As String(2) Public St As String* *8 8(3) Redim B(3) As Integer(3) Redim B(3) As Integer(4) Dim Const X As Integer=10(4) Dim Const X As In