全國(guó)計(jì)算機(jī)等級(jí)考試復(fù)習(xí)資料

1、精品Visual Basic程序設(shè)計(jì)基礎(chǔ)知識(shí)要點(diǎn)（概念分析篇）知識(shí)點(diǎn) 1：（ 1 ） 在工程資源管理器窗口中可以包含：工程文件、窗體模塊文件、標(biāo)準(zhǔn)模塊文件和類(lèi)模塊文件（其中可以包含許多各種文件類(lèi)型）。（ 2 ） Visual Basic 應(yīng)用程序可以以解釋方式執(zhí)行和編譯方式執(zhí)行。例題：（1 ）以下敘述中錯(cuò)誤的是AA 在工程資源管理器窗口中只能包含一個(gè)工程文件及屬于該工程的其他文件。B以 .bas 為擴(kuò)展名的文件是標(biāo)準(zhǔn)模塊文件。C窗體文件包含該窗體及其控件的屬性。D 一個(gè)工程中可以有多個(gè)標(biāo)準(zhǔn)模塊文件。（2 ）以下敘述中錯(cuò)誤的是CA 打開(kāi)一個(gè)工程文件時(shí)，系統(tǒng)自動(dòng)裝入與該工程有關(guān)的窗體、標(biāo)準(zhǔn)模塊等文

2、件。B保存 Visual Basic程序時(shí)，應(yīng)分別保存窗體文件及工程文件。CVisual Basic應(yīng)用程序只能以解釋方式執(zhí)行。D 事件可以由用戶(hù)引發(fā)，也可以由系統(tǒng)引發(fā)。知識(shí)點(diǎn) 2：（ 1 ） 窗體和各種控件的名稱(chēng)（ Name ）是唯一的，用來(lái)標(biāo)識(shí)一個(gè)窗體或控件的。而窗體和控件的標(biāo)題是用來(lái)說(shuō)明的，是可有可無(wú)的。（ 2 ） 各種控件之間有部分相同的屬性，并不是擁有所有屬性?？丶行傩灾荒茉趯傩源翱谥性O(shè)置，但也有少數(shù)屬性只能在代碼狀態(tài)設(shè)置。（3 ）Form1.Hide方法和 Unload Form1方法的區(qū)別：第一個(gè)方法窗體消失并不存在于感謝下載載精品內(nèi)存中；第二個(gè)方法窗體消失但仍存在于內(nèi)存中。

3、例題：（1 ）以下敘述中正確的是AA 窗體的Name屬性指定窗體的名稱(chēng)，用來(lái)標(biāo)識(shí)一個(gè)窗體。B窗體的Name屬性的值是顯示在窗體標(biāo)題欄中的文本。C可以在運(yùn)行期間改變對(duì)象的Name屬性的值。D 對(duì)象的Name屬性值可以為空。（2 ）以下敘述中錯(cuò)誤的是CA Visual Basic是事件驅(qū)動(dòng)型可視化編輯工具。B Visual Basic應(yīng)用程序不具有明顯的開(kāi)始和結(jié)束語(yǔ)句。CVisual Basic工具箱中的所有控件都具有Width和 Height屬性。D Visual Basic中控件的某些屬性只能在運(yùn)行時(shí)設(shè)置。知識(shí)點(diǎn) 3：（1 ）標(biāo)簽 (Label1) ：Autosize的 True 屬性可以自動(dòng)

4、調(diào)整標(biāo)簽的大小，而 False 屬性不能。（ 2 ） 文本框 (Text1) ：1 、 Maxlength屬性表示文本框所能容納的字符數(shù)。2 、 Password屬性表示口令輸入，可以是“*”或“？”等。設(shè)置文本框輸入字符為“ *”： Text1.Password=”*”,還原文本框字符：Text1.Password=”,3 、 ScrollBars屬性是表示文本框有垂直或水平滾動(dòng)條，但是需要和多行屬性Multiline結(jié)合一起使用。4 、 SelLength屬性是表示選中文本框中字符的個(gè)數(shù)：Text1.SelLength。 SelStart屬性是表示選中文本框中字符或光標(biāo)之前的字符數(shù)：Tex

5、t1.SelStrart。 SelText屬性是表示感謝下載載精品選中文本框中的字符：Text1. SelText 。5 、文本的主要事件是Change事件： (標(biāo)簽內(nèi)容隨文本框內(nèi)容變化而變化)Private sub Command_Change（）Label1.caption=Text1.textEnd sub6 、文本框的方法只有一個(gè)：Text1.SetFocus例題：（1 ） 能夠獲得一個(gè)文本框中被選取文本的內(nèi)容的屬性是CA TextB. SelLengthC. SelTextD. SelStrart（ 2 ） 在窗體上畫(huà)一個(gè)文本框 (其名稱(chēng)為 Text1) 和標(biāo)簽 (其名稱(chēng)為 Labe

6、l1) 。要求程序運(yùn)行后，如果在文本框中輸入字符， 則立即在標(biāo)簽中顯示相同的內(nèi)容。 以下可以實(shí)現(xiàn)上述操作的事件過(guò)程是AA Private Sub Text1_Change（）B. Private Sub Text1_Click（）Label1.caption=Text1.TextLabel1.caption=Text1.TextEnd SubEnd SubC Private Sub Label1_Change（）D. Private Sub Label1_Click（）Label1.caption=Text1.TextLabel1.caption=Text1.TextEnd Sub（ 3 ）命

7、令按鈕 (Command1):1 、 Default 屬性：當(dāng)一個(gè)命令按鈕的 Default 屬性為 True 時(shí)，按回車(chē)鍵和單擊該命令按鈕的效果相同。2 、Cancel 屬性：當(dāng)一個(gè)命令按鈕的 Cancel 屬性為 True 時(shí)，按 ESC 鍵和單擊該命感謝下載載精品令按鈕的效果相同。（4 ）單選按鈕和復(fù)選框(Option1和 Check1) ：1 、單選按鈕：Value 屬性的值是True( 選中 )和 False( 未選中 )，Option1.Value=True等同于 Option1.Value用法。2 、復(fù)選框：Value屬性的值是0( 未選中 )、 1( 選中 ) 和 2( 表示暫

8、時(shí)不可用) 。Check1.Value=False可以用，但 Check1.Value=True不可用 (因?yàn)?True只能轉(zhuǎn)化數(shù)值 1而不是 1) 。（5 ）列表框 (List1):1 、 List屬 性 是 一 個(gè) 數(shù) 組 型 屬 性 ： List1.List( 索 引 ) ， 索 引 可 以 是 數(shù) 字0 、1 ,List1.listindex,變量 i （ List1.T ext 等同于 List1.list(List1.listindex)）。2 、 MultSelect屬性：用來(lái)設(shè)置一次可以多選表項(xiàng)數(shù)。MultSelect屬性值為0 時(shí)，每次只能選擇一項(xiàng)； MultSelect屬性

9、值為1 時(shí)，可以同時(shí)選擇多個(gè)項(xiàng)目；MultSelect屬性值為 2 時(shí)，可以用輔助鍵 Shift或 Ctrl 選擇多個(gè)項(xiàng)目。3 、常用方法： AddItem方法表示添加的是一個(gè)項(xiàng)目，而 Removeitem 方法表示通過(guò)刪除索引的方式刪除項(xiàng)目。RemoveItem索引索引可以是數(shù)字0 、1 ,List1.listindex,變量 i。（ 6 ）組合框（ Combo1 ）：1 、Style 屬性： Style 屬性值為0 時(shí)，表示下拉式組合框；Style 屬性值為1 時(shí)，表示下簡(jiǎn)單組合框；Style 屬性值為 2 時(shí)，表示下拉式列表框。其他功能類(lèi)似列表框(List1) 。（ 7 ）圖片框和圖像框

10、(Picture1和 Image1):1 、圖片框 (Picture1)：Autosize屬性值為T(mén)rue 時(shí)，表示圖片框大小隨圖片大小改變而改變； Autosize屬性值為False 時(shí)，表示圖片框只能部分顯示大圖片。感謝下載載精品2 、圖像框 (Image1) ： Stretch屬性為 True 時(shí)，圖片大小隨圖像框的大小改變而改變； Stretch屬性為 True 時(shí)，圖像框的大小隨圖片大小的改變而改變。3 、兩種圖形類(lèi)型都可以按照下面這個(gè)方法加載圖片：Picture1.picture=LoadPicture(App.Path &“ 圖片名稱(chēng) .擴(kuò)展名 ” )Image1.pic

11、ture=LoadPicture(App.Path &“ 圖片名稱(chēng) .擴(kuò)展名 ” )如果要清楚圖片：Picture1.picture=LoadPicture(“” )Image1.picture=LoadPicture(“” )注意 :如果使用App.Path方法需要先保存好窗體文件和工程文件到考生文件夾中。（ 8 ）滾動(dòng)條 (HScroll1) ：1 、Max 和 Min 屬性是分別表示滾動(dòng)條的最大和最小刻度，刻度值用 Value 屬性值來(lái)表示： HScroll1.value。2 、 LargeChange和 SmallChange屬性是分別表示移動(dòng)滾動(dòng)條上的左右箭頭按鈕的移動(dòng)量和移

12、動(dòng)滾動(dòng)條上滾動(dòng)框的移動(dòng)量。3 、 Scroll和 Change事件分別表示拖動(dòng)滾動(dòng)條上滾動(dòng)框的操作和單擊滾動(dòng)條上箭頭按鈕的操作。（ 9 ）計(jì)時(shí)器 (Timer1) ：1 、Enabled屬性： Enabled屬性值為 True 時(shí)，表示計(jì)時(shí)器可以走動(dòng)；Enabled屬性感謝下載載精品值為 False 時(shí)，表示計(jì)時(shí)器停止走動(dòng)；2 、 Interval屬性：是表示計(jì)時(shí)器運(yùn)動(dòng)的時(shí)間間隔，單位為毫秒。1秒時(shí)間：Timer1.Interval=1000。3 、 Enabled和 Interval這兩個(gè)屬性一般情況下需要一起使用。知識(shí)點(diǎn) 4：（ 1 ） Visual Basic 常用函數(shù)的使用方法：1、數(shù)

13、學(xué)函數(shù)： 求平方根： Sqr(n) 求自然對(duì)數(shù)Log(n)ln nlog 78=loge8/loge 7( 注意非e 為底的對(duì)數(shù)需要如此轉(zhuǎn)換 ) 求以 e 為底的冪值， e xexExp(x)1n>0 Sqn(n)=0n=0 Rad()->X=Int(Rnd*(上界 下界 +1)+ 下界（產(chǎn)生隨機(jī)整數(shù)）2、轉(zhuǎn)換函數(shù)： Str(x) 數(shù)值 x 轉(zhuǎn)換成字符串 str(12.75)= ”12.75 ”這樣轉(zhuǎn)換 12.75 之前會(huì)多出一位。如果使用 Cstr(12.75)= ”12.75 ”這樣轉(zhuǎn)換 12.75 之前不會(huì)多出一位。 Val(x) 字符 x 轉(zhuǎn)換成數(shù)值，但 x 要一定是數(shù)字字

14、符才行， Val( “12.75 ”)=12.75,如果是含有其他字符Val( “12.7ab ”)將無(wú)法轉(zhuǎn)換。chr(x)返回以x 為 Asccii代碼值的字符chr(97)=”a”;Asc(x)給出字符x的 Asccii 代碼值A(chǔ)sc( “A”)=65三種類(lèi)型ASCII 代碼值轉(zhuǎn)換：感謝下載載精品Asc( “0”)Asc( “9”)-4857Asc( “A ”)Asc( “Z ”)-6590Asc( “a”)Asc( “z”)-97122特殊情況： Asc( “ABC ”)=65只求第一個(gè)字符“A ”的 Ascii 代碼值 Fix(x)將數(shù)值型數(shù)據(jù)x 的小數(shù)部分舍去Fix(12.8)=12

15、Fix(-12.5)=-12;Int(x)取小于等于x 的最大整數(shù)當(dāng) x>0時(shí)，用法和 Fix 一樣；當(dāng) x<0 時(shí)，Int(-12.3)= -13;Cint(x)將數(shù)值型數(shù)據(jù)x 的小數(shù)部分四舍五入Cint(12.7)=13Cint(12.3)=12但是有特殊情況：x當(dāng) x 是偶數(shù)Cint(x.5)=x+1當(dāng) x 是奇數(shù)3 、字符函數(shù)Left(x,n)從 x 字符串左邊起取n 個(gè)字符Left("ABCDEFG",3)="ABC"Right(x,n)從 x 字符串右邊起取n 個(gè)字符Right("ABCDEFG",3)=&qu

16、ot;EFG"。Mid(x,n1,n2)從字符串x 左邊第 n1 個(gè)位置開(kāi)始向右起取n2 個(gè)字符Mid(x,n)從字符串x 左邊第 n 個(gè)位置開(kāi)始向右全部取Mid("ABCDEFG",3,2)= "CD"Mid("ABCDEFG",3)= "CDEFG" Instr(n,s1,s2)從字符串 s1 的第 n 個(gè)位置起查找 s2 在 s1 中位置，如果 n省略，則默認(rèn)從字符串s1 的第 1 個(gè)位置起查找s2 在 s1 中位置Instr(2,"ABCDEFG","CD"

17、)=3知識(shí)點(diǎn) 5：1 、運(yùn)算符： 算術(shù)運(yùn)算符感謝下載載精品運(yùn)算符的優(yōu)先級(jí)：> - > (* /) > > Mod > (+ -)關(guān)系運(yùn)算符<<=>>=<>LikeIs 運(yùn)算符優(yōu)先級(jí)相同邏輯運(yùn)算符運(yùn)算符的優(yōu)先級(jí)：Not > And > Or > Xor > Eqv例題：（1 ） 表達(dá)式 4 + 5 6 * 7 / 8 Mod 9的值是BA4B.5C.6D.7（2 ） a=3b=2c=1求 Print a>b>c的結(jié)果？首先 a>b的結(jié)果是true, 然后再 Print True>c此

18、時(shí) True 需要轉(zhuǎn)換成-1 再比較， Print -1>1結(jié)果是 False ，所以整個(gè)輸出結(jié)果是False 。知識(shí)點(diǎn) 6：1 、交互函數(shù)的使用： InputBox 函數(shù)：A=InputBox("提示信息 "," 標(biāo)題信息 "," 默認(rèn)值或輸入框的值")例題：(1) 執(zhí)行下列語(yǔ)句后， 將顯示輸入對(duì)話框， 此時(shí)如果單擊 “確定” 按鈕，則變量 strInput的內(nèi)容是CstrInput=InputBox("請(qǐng)輸入字符串 "," 字符串對(duì)話框"," 字符串 ")A &qu

19、ot; 請(qǐng)輸入字符串"B. " 字符串對(duì)話框"C. " 字符串 "D. 空字符串感謝下載載精品 MsgBox 函數(shù)：MsgBox“ 提示信息 ”, 按鈕類(lèi)型值 + 圖標(biāo)類(lèi)型值 + 默認(rèn)焦點(diǎn)值 , “ 標(biāo)題信息 ”A= MsgBox“ 提示信息 ” , 按鈕類(lèi)型值 + 圖標(biāo)類(lèi)型值 + 默認(rèn)焦點(diǎn)值 , “ 標(biāo)題信息 ” ；A 的值根據(jù)單擊什么按鈕有關(guān)，A 的值在 1,7 之間取值。比如：?jiǎn)螕簟按_定”按鈕， A=1 。例題：（ 1）以上圖形所表示的函數(shù)表達(dá)式為：MsgBox "請(qǐng)輸入查詢(xún)的學(xué)生學(xué)號(hào)：", 3 + 32 + 256,

20、 "學(xué)生基本信息查詢(xún)"知識(shí)點(diǎn) 7：1 、選擇結(jié)構(gòu)語(yǔ)句（If 條件語(yǔ)句）：?jiǎn)畏种l件語(yǔ)句：格式：If條件Then語(yǔ)句塊End If（稱(chēng) If 塊語(yǔ)句）If條件Then只有一條語(yǔ)句（稱(chēng) If 條語(yǔ)句）感謝下載載精品雙分支條件語(yǔ)句：格式： If條件Then語(yǔ)句塊 1Else語(yǔ)句塊 2End If多分支條件語(yǔ)句If條件 1Then語(yǔ)句塊 1Elseif條件 2Then語(yǔ)句塊 2。Else語(yǔ)句塊 nEnd If其中，條件可以是：關(guān)系表達(dá)式(a>5) 、邏輯表達(dá)式 (a>5 And c>4)、變量(i) 或常數(shù) (0) 。例題：（ 1 ） 下列程序段的執(zhí)行結(jié)果為AX=

21、5Y=-20If Not x>0 Then感謝下載載精品x=y-3ElseY=x+3End IfPrint x-y;y-xA.-33B.5-8C.3-3D. 25-25以上題中的“條件”主要是邏輯表達(dá)式。（ 2） 下列程序段的執(zhí)行結(jié)果為BX=2Y=1If x*y<1 Then y=y-1 Else y=-1Print y-x>0A. TrueB. FalseC. -1D.1以上題中的“條件”主要是關(guān)系表達(dá)式。（ 3） 下列程序段的執(zhí)行結(jié)果為CDim x As IntegerIf x ThenPrint x Else Print x-1A. 1B. 0C. -1D.不確定以上題

22、中的“條件”主要是變量。2 、選擇結(jié)構(gòu)語(yǔ)句（Select Case語(yǔ)句）：Select Case測(cè)試表達(dá)式Case表達(dá)式列表1感謝下載載精品語(yǔ)句塊 1Case表達(dá)式列表2語(yǔ)句塊 2。CaseElse語(yǔ)句塊 nEnd Select注意：測(cè)試表達(dá)式的類(lèi)型只能是數(shù)值數(shù)據(jù)或字符型，表達(dá)式列表的值只要第一個(gè)符合測(cè)試表達(dá)式值的要求，就結(jié)束SelectCase 語(yǔ)句；表達(dá)式列表可以是三種結(jié)構(gòu)或三種混合結(jié)構(gòu)：、1 To 10、 1,3,5,6,7,8、 Is>10、 1,2,5,7,Is>10例題：（ 1）在窗體上畫(huà)一個(gè)名稱(chēng)為 Command1 的命令按鈕和兩個(gè)名稱(chēng)分別為T(mén)ext1和 Text2

23、的文本框，然后編寫(xiě)如下事件過(guò)程：Private Sub Command1_Click()n=Text1.textSelect Case nCase 1 T 10X=10Case 2,4,6X=20Case Is<10X=30感謝下載載精品Case 10X=10End SelectText2.text=xEnd Sub程序運(yùn)行后，如果在文本框Text1中輸入10 ，然后單擊命令按鈕，則在Text2 中顯示的內(nèi)容是AA. 10B. 20C. 30D.403 、選擇結(jié)構(gòu)語(yǔ)句（IIF 函數(shù)）：變量 =IIF( 條件，參數(shù)1 ，參數(shù) 2)其中，條件可以是：關(guān)系表達(dá)式(a>5) 、邏輯表達(dá)式(

24、a>5 And c>4)、變量 (i) 或常數(shù) (0) 。執(zhí)行過(guò)程：條件成立，變量的值就是“參數(shù)1 ”，否則變量的值就是“參數(shù) 2”。例題：（ 1） 設(shè) a=6, 則執(zhí)行語(yǔ)句：x=IIF(a>5,-1,0)后， x 的值為DA.5B.6C.0D.-1知識(shí)點(diǎn) 8：1 、循環(huán)結(jié)構(gòu) For循環(huán)變量 = 初值To終值Step步長(zhǎng)循環(huán)體If 條件Then語(yǔ)句感謝下載載精品Exit ForEnd IfNext 循環(huán)變量注意：循環(huán)如果正常退出時(shí)(沒(méi)有執(zhí)行 Exit For語(yǔ)句 )，那么循環(huán)變量必須要大于終值或等于終值 + 步長(zhǎng)。Do循環(huán)體 Do While 條件Loop While條件循環(huán)

25、體LoopDoDo Until 條件循環(huán)體Loop Until條件循環(huán)體Loop注意：左邊上下兩種循環(huán)是先判斷條件后執(zhí)行循環(huán)體，右邊上下兩種循環(huán)是不管條件成立與否都至少執(zhí)行一次；While循環(huán)是條件成立執(zhí)行循環(huán)體，Until循環(huán)是條件不成立執(zhí)行循環(huán)體。例題：（1 ） 下列程序段的執(zhí)行結(jié)果為Bs=0:t=0:u=0For x=1 To 3For y=1 To xFor z=y To 3s=s+1感謝下載載精品Next zt=t+1Next yu=u+1Next xPrint s;t;uA.3614B.1463C.1436D.1643分析：A 組語(yǔ)句和B 語(yǔ)句都在 X 循環(huán)內(nèi)， 并且是并列的， 所

26、以可以先計(jì)算B 組語(yǔ)句， A 組語(yǔ)句暫時(shí)不算，這樣很容易求出u=u+1語(yǔ)句循環(huán)了三次，則u=3 ；C 組語(yǔ)句和D語(yǔ)句都在Y 循環(huán)內(nèi)，并且是并列的，所以可以先計(jì)算D 組語(yǔ)句， C 組語(yǔ)句暫時(shí)不算，這樣也比較容易求出t=t+1語(yǔ)句循環(huán)了六次， 則 t=6 ；然后再結(jié)合答案很快就能得出答案是選B。知識(shí)點(diǎn) 9：1 、數(shù)組： 數(shù)組的概念 等級(jí)考試主要考一維數(shù)組、二維數(shù)組和三維數(shù)組(三維的只需知道數(shù)組中可以存儲(chǔ)多少數(shù)據(jù)即可)。數(shù)組的格式：a(2,3 To 7,-1 To 2)，那它的存儲(chǔ)空間大小計(jì)算：每一維用上界 - 下界 +1 計(jì)算，例如(2-0+1)*(7-3+1)*(2-(-1)+1)=3*5*4=

27、60。 數(shù)組的下標(biāo)下界是根據(jù)語(yǔ)句Option Base n來(lái)決定：當(dāng)n=0時(shí)，數(shù)組下標(biāo)下界是從0 開(kāi)始；當(dāng)n=1時(shí)，數(shù)組下標(biāo)下界是從1 開(kāi)始。 數(shù)組分為：固定大小數(shù)組: Dim a(10) As Integer感謝下載載精品動(dòng)態(tài)大小數(shù)組: Dim a() As IntegerRedima(10) Array 函數(shù)用法：為一個(gè) 變體型變量 創(chuàng)建一個(gè)數(shù)組。Dim a as Varianta=Array(1,2,3,4,5)因此： a(0)=1a(1)=2a(2)=3a(3)=4a(4)=5 注意：如果數(shù)組被定義為一下三種類(lèi)型，(1)數(shù)值型(2)字符型(3) 邏輯型，則它們初始化的數(shù)組元素?cái)?shù)值分別為

28、：0、空字符串和False 。例題：（ 1 ）在窗體上畫(huà)一個(gè)命令按鈕（其N(xiāo)ame屬性為 Command1） ,然后編寫(xiě)如下代碼：Private Sub Command1_Click()Dim a(4,4) As IntegerFor i=1 To 4For j=1 To 4a(i,j)=(i-1)*3+jNext jNext iFor i=3 To 4For j=3 To 4Print a(j,i)Next jPrint感謝下載載精品Next iEnd Sub程序運(yùn)行后，單擊命令按鈕，其輸出結(jié)果為D。A. 69B.7 10C.8 11D.9127108119121013分析：對(duì)循環(huán)和數(shù)組結(jié)合的

29、問(wèn)題，往往要先看B 組語(yǔ)句輸出結(jié)果是什么，然后根據(jù) B 組語(yǔ)句輸出結(jié)果代入到A 組語(yǔ)句中求結(jié)果。B 組語(yǔ)句輸出結(jié)果：a(3,3)a(4,3)a(3,4)a(4,4)代入 A 組語(yǔ)句的結(jié)果：9121013知識(shí)點(diǎn) 10 ：1 、過(guò)程與函數(shù)： 過(guò)程與函數(shù)的參數(shù)類(lèi)型有：實(shí)參和形參；傳遞方式有：值傳遞和地址傳遞。 以下程序中， x,y 為實(shí)參； a,b 為形參注意：實(shí)參要與形參的類(lèi)型、個(gè)數(shù)要相同。 在形參 a,b 之前如果加上關(guān)鍵字 ByVal ，那么就是值傳遞；如果加上關(guān)鍵字 ByRef 或不加關(guān)鍵字，那么就是地址傳遞。感謝下載載精品 過(guò)程調(diào)用方式有兩種：Call Swap(x,y)或 Swap x,

30、y(Swap是過(guò)程名 )注意：只有地址傳遞方式才能實(shí)現(xiàn)交換功能，值傳遞方式x,y 的值不變。當(dāng)有事件過(guò)程和通用過(guò)程一起運(yùn)行時(shí)，先執(zhí)行事件過(guò)程(Command_Click)。例題 ：（ 1） 假定有如下的Sub 過(guò)程：Sub S(x As Single,ByVal y as Single)t=xx=t/yy=t Mod yEnd Sub在窗體上畫(huà)一個(gè)命令按鈕，其名稱(chēng)為Command1，然后編寫(xiě)如下事件過(guò)程：Private Sub Command1_Click()Dim a As Single, b As Singlea=5:b=4S a,b Print a,b感謝下載載精品End Sub程序運(yùn)行

31、后，單擊命令按鈕，輸出結(jié)果為_(kāi)C_。A.54B.11C.1.254D.1.251程序分析：首先形參x 是地址傳遞方式，當(dāng)a 傳遞給 x 時(shí)，因此a 與 x 擁有一個(gè)共同存儲(chǔ)空間，圖形表示：；形參y 是值傳遞方式，當(dāng)b 傳遞給 y 時(shí)，因此b與 y 是兩個(gè)不同存儲(chǔ)空間，圖形表示：；那么在過(guò)程S 中：運(yùn)算 x=t/y后， x=1.25 ，圖形表示；因此 a 的值就是1.25 ；運(yùn)算 y=t Mod y后， y=1 ，圖形表示 :，因?yàn)榇藭r(shí)b 和 y 存儲(chǔ)空間不同，則不影響 b 的值，則還是4,因此 Print a,b的結(jié)果就是選擇C 答案。知識(shí)點(diǎn) 11 ：1 、菜單和鼠標(biāo)事件 菜單編輯器的使用：感

32、謝下載載精品注意：菜單中的標(biāo)題可以為空，但不論是第幾級(jí)菜單名稱(chēng)必須唯一，且不能為空。 鼠標(biāo)事件（按下鼠標(biāo)鍵事件過(guò)程）主 要 事件 有 ：Form_MouseDown、Form_MouseUp和Form_MouseMove?，F(xiàn)在以某個(gè)為例說(shuō)明：Private Sub Form_MouseDown(Button As Integer, Shift As Integer,X As Single, Y As Single)End Sub上述事件過(guò)程不僅使用在窗體上(Form_MouseDown),還可以使用于大多數(shù)控件上， 包括命令按鈕(Command1_MouseDown)或文本框 (Text1_M

33、ouseDown)等。以上鼠標(biāo)事件過(guò)程的參數(shù)，含義如下：（1 ）Button有值 1 、 2 和 4 ，分別表示按下左鍵、右鍵和中建；（2 ）Shift表示 Shift 、 Ctrl 和 Alt 鍵的狀態(tài)，其值分別是1 、2 和 4 ；（3 ）X ，Y表示鼠標(biāo)光標(biāo)的坐標(biāo)位置感謝下載載精品 彈出式菜單（菜單和鼠標(biāo)事件的結(jié)合使用）Private Sub Form_MouseDown(Button As Integer, Shift As Integer,X As Single, Y As Single)If Button=1 Then按下鼠標(biāo)左鍵PopUpmenuFile通過(guò) PopUpmenu方

34、法彈出菜單End If File 是一級(jí)菜單的名稱(chēng)End Sub運(yùn)行效果 ：2 、公共對(duì)話框 (又稱(chēng)通用對(duì)話框) 通用對(duì)話框是我們考試中唯一一個(gè)控件箱中沒(méi)有的控件，需要我們自己添加的，添加的方法是在“工程”菜單的“部件”項(xiàng)中選擇“MicrosoftCommonDialogControl 6.0”后，才會(huì)在控件箱中出現(xiàn)通用對(duì)話框圖標(biāo)。 通用對(duì)話框圖形感謝下載載精品根據(jù)以上圖形，相應(yīng)的程序代碼如下：注意： CommonDialog.FilterIndex =索引（索引是從1 開(kāi)始）知識(shí)點(diǎn) 12 ：1 、文件文件包括三種：順序文件、隨機(jī)文件和二進(jìn)制文件 順序訪問(wèn)：文件中數(shù)據(jù)是以ASCII 碼存儲(chǔ)的。

35、隨機(jī)訪問(wèn)：文件長(zhǎng)度記錄是固定不變 的，數(shù)據(jù)類(lèi)型可以不同，數(shù)據(jù)以二進(jìn)制方式存儲(chǔ)在文件中，可以任意時(shí)候，任意地方訪問(wèn)。二進(jìn)制訪問(wèn)：必須知道數(shù)據(jù)是如何寫(xiě)入文件的。感謝下載載精品 如果源文件是字符類(lèi)型，那么讀寫(xiě)文件如下所示：讀文件的格式：文件名 (In.txt)" For Input As #文件號(hào) (#1)Do while Not Eof(文件號(hào) )Input #文件號(hào) ,變量LoopClose # 文件號(hào)寫(xiě)文件格式：文件名 (Out.txt)" For Output(Append) As #文件號(hào)(#1)Print # 文件號(hào) ,變量Close # 文件號(hào)注意：當(dāng)寫(xiě)文件以O(shè)ut

36、put方式時(shí)，原來(lái)的文件內(nèi)容將被覆蓋；當(dāng)寫(xiě)文件以 Append方式時(shí)，新的文件內(nèi)容將被添加到文件尾部； 如果源文件是數(shù)值類(lèi)型，那么讀寫(xiě)文件如下所示：Dim a(10) As Integer文件名 (In.txt)" For Input As #文件號(hào) (#1)For i=1 To 10Input #文件號(hào) ,a(i)Next iClose # 文件號(hào)感謝下載載精品寫(xiě)文件格式：文件名 (Out.txt)" For Output(Append) As #文件號(hào)(#1)For i=1 To 10Print # 文件號(hào) ,a(i)Next iClose # 文件號(hào)例題：（ 1 ）

37、在 考 生 文 件 夾 下 有 文 件 in5.txt ， 文 件 中 有 字 符 串“0&1%$s#2&3!45u6ydf7ff8|9er”。請(qǐng)?jiān)?Forml 的窗體上畫(huà)一個(gè)文本框， 名稱(chēng)為 Text1 ，能顯示多行；在畫(huà)一個(gè)命令按鈕，名稱(chēng)為 Cl ，標(biāo)題為“存盤(pán)” 。編寫(xiě)適當(dāng)?shù)氖录^(guò)程，使得在加載窗體時(shí)，把 in5.txt 文件的內(nèi)容中 數(shù)字字符 顯示在文本框里。然后單擊“存盤(pán)”按鈕，把文本框中的內(nèi)容存到文件 out5.txt 中。如圖所示：根據(jù)題目要求，所編寫(xiě)程序如下：感謝下載載精品（ 2） 在考生文件下有文件 in.txt ，文件有 10 個(gè)數(shù)據(jù)：123 521 362

38、 821 400 300710 990 120 500.請(qǐng)?jiān)?Forml的窗體上畫(huà)一個(gè)文本框，名稱(chēng)為T(mén)ext1 ，能顯示多行；在畫(huà)一個(gè)命令按鈕，名稱(chēng)為Cl，標(biāo)題為“存盤(pán)” 。編寫(xiě)適當(dāng)?shù)氖录^(guò)程，使得在加載窗體時(shí)，把in5.txt文件的內(nèi)容顯示在文本框里，然后統(tǒng)計(jì)10個(gè)數(shù)的最大數(shù)、最小數(shù)和它們的和，并把最大數(shù)、最小數(shù)和它們的和寫(xiě)到“out.txt ”文件中。如圖所示：根據(jù)題目要求，所編寫(xiě)程序如下：感謝下載載精品感謝下載載精品Visual Basic程序設(shè)計(jì)基礎(chǔ)知識(shí)要點(diǎn)（程序設(shè)計(jì)篇）全國(guó)計(jì)算機(jī)等級(jí)考試中常用的程序編程部分：一、 求最大數(shù)、最小數(shù)、求和以及求平均數(shù)二、 求階層三、 求最大公約數(shù)四、

39、求素?cái)?shù)五、 求水仙花數(shù)（拆數(shù)法）六、 排序（選擇排序、直接插入排序和冒泡排序）七、 字符操作1、字符串取反（反向輸出字符串）2、判斷字符串中的某個(gè)字符是否為字母感謝下載載精品3、統(tǒng)計(jì)每類(lèi)字符的個(gè)數(shù)八、 矩陣求法（二維數(shù)組）九、 文件讀寫(xiě)操作1、字符型讀寫(xiě)操作2、數(shù)值型讀寫(xiě)操作九大問(wèn)題具體例子分析：一、求最大數(shù)、最小數(shù)、求和以及求平均數(shù)例題：隨機(jī)產(chǎn)生10 個(gè)兩位整數(shù) ，并存入數(shù)據(jù)a 中，然后分別求10 個(gè)元素中的 最大數(shù)、最小數(shù) 、求 10 個(gè)元素之和 以及它們的 平均數(shù) 。Private Sub Command1_Click()感謝下載載精品Dim a(10) As Integer, i As Integer, Max As Integer, Min As IntegerDim Sum as Integer, Avg As SingleSum=0For i= 1 To 10a(i)=Int(Rnd*90)+10 產(chǎn)生 10 99 之間的隨機(jī)整數(shù)Next iMax=a(1):Min=a(1) 假設(shè)最大數(shù)和最小數(shù)For i= 1 To 10If Max<