【正文】
isum=6Private Sub Command1_Click() Dim Z% Z=Z+2 Call S Print ZEnd SubSub S( ) Static Z As IntegerZ=Z+2Print Z。 ActiveX部件 工程/部件 至 選定控件 單選按鈕、復(fù)選框和框架(OptionButton ) 單選按鈕以組的形式出現(xiàn),允許在多項(xiàng)中選擇一項(xiàng)。 單選按鈕以組的形式出現(xiàn),允許在多項(xiàng)中選擇一項(xiàng)。 Value屬性 表示單選按鈕的狀態(tài): Click事件 單擊后,Value屬性為True目錄屬性Caption屬性 框架上的標(biāo)題文本.事件框架可以響應(yīng)Click和DoubleClick事件,但一般不需要編寫事件過程。 控 件 默認(rèn)屬性 控 件 默認(rèn)屬性 文本框、列表框和組合框 沒有Caption 屬性 命令按鈕 Default 圖形 圖象誆 Picture所謂默認(rèn)屬性是程序運(yùn)行時(shí),不必指明屬性名而可以改變其值的哪個(gè)屬性。重要事件Click事件 False —— 未被選定 重要屬性 單選按鈕、復(fù)選框和框架 ActiveX DLL2. ActiveX控件 ActiveX部件:是可以重復(fù)使用的編程代碼和數(shù)據(jù) 是由用ActiveX技術(shù)創(chuàng)建的一個(gè)或多個(gè)對(duì)象所組成 ActiveX部件文件:擴(kuò)展名OCX,在Windows的SYSTEM目錄中 當(dāng)程序運(yùn)行時(shí),寫出程序結(jié)果。 b a = 10 : b = 20 Swap2 a, b Print a=。注意:? 在實(shí)參和形參中寫數(shù)組名,忽略維數(shù)的定義,但圓括號(hào)不能省? 被調(diào)過程可通過Lbound和Ubound函數(shù)確定實(shí)參數(shù)組的下、上界 變量的作用域(p140)作用范圍過程級(jí)變量窗體/模塊級(jí)變量全局變量聲明方式DimDim、PrivatePublic聲明位置在過程中過程外過程外能被本過程的其他語句塊存取能能能能被本模塊的其他過程存取不能能能能被其他模塊存取不能不能能,但在變量名前要加窗體名當(dāng)程序運(yùn)行時(shí),寫出程序結(jié)果。2. 地址傳遞( ByRef )將實(shí)參在內(nèi)存的地址傳遞給形參,數(shù)據(jù)傳遞是雙向的,即調(diào)用時(shí)實(shí)參將值傳遞給形參,調(diào)用結(jié)束后由形參將操作結(jié)果返回給實(shí)參。2子過程Sub 子過程名[(參數(shù)列表)] 局部變量或常數(shù)定義語句 語句塊1 [Exit Sub] 語句塊2End Sub 或: 子過程名 實(shí)參表特點(diǎn): 子過程名無值,無類型。 常用方法v AddItem方法 把一個(gè)項(xiàng)目加入列表 項(xiàng)目字符串 [,索引值]索引值:決定新增項(xiàng)在列表中的位置,如果省略,則新增項(xiàng)目添加在最后。MultiSelect 0 None:禁止多項(xiàng)選擇。 False:按加入先后順序排列。組合框有3種式樣。 a(I) PrintNext IEnd Sub 列表框和組合框 MIN=。1. 用下面的語句定義的數(shù)組的元素的個(gè)數(shù)為( ) Dim Arr1( 2 To 5) as Integer A 8 B 9 C 7 D 112. 指出下列語句錯(cuò)誤的原因?qū)嶒?yàn)E:1 Dim n As Integer n=12 Dim a (1 To n ) As IntegerPrivate Sub Form_Click() Dim a(1 To 10) As IntegerDim i%, max%, min%, aver%For i = 1 To 10 思考:如何在二維數(shù)組中求最大值、最小值以及它們的位置。對(duì)于大量的數(shù)據(jù)輸入,可通過For...Next...循環(huán)來處理。(2) 使用ReDim語句將重新對(duì)數(shù)組元素進(jìn)行初始化,會(huì)使原來 數(shù)組中的值丟失,可以在ReDim語句后加Preserve參數(shù)來保留數(shù)組中的數(shù)據(jù)。例如: Option Base 1 (2) 錯(cuò)誤的聲明,下標(biāo)只能是常量,不能是變量或表達(dá)式。例如: Option Base 1 (2) 錯(cuò)誤的聲明,下標(biāo)只能是常量,不能是變量或表達(dá)式。 實(shí)驗(yàn)D:6編一程序,顯示所有的水仙花數(shù)。 外循環(huán)要完整地包含內(nèi)循環(huán)結(jié)構(gòu),不能交叉,循環(huán)控制變量名不能相同。 下面第40號(hào)語句共執(zhí)行了_____ 次,第41號(hào)語句共執(zhí)行了______ 次,……30 FOR J=1 TO 12 STEP 340 FOR K=6 TO 2 STEP 241 MsgBox(j amp。 步長 0 初值=終值 =1 時(shí),可省略 實(shí)驗(yàn)C:1 p2655. 情況語句Select Case格式: Select Case 變量或表達(dá)式 Case 表達(dá)式列表1 語句塊1 Case 表達(dá)式列表2 語句塊2 ...... Case Else 語句塊n+1 End Select說明: 測試表達(dá)式 : 數(shù)值或字符表達(dá)式 Case 表達(dá)式表: 表中的表項(xiàng)為如下形式: (1) 表達(dá)式1 [,表達(dá)式2]... 如: Case 1 , 3 , 5 (2) 表達(dá)式1 TO 表達(dá)式2 如: Case 10 to 30 Case A to Z (3) Is 關(guān)系運(yùn)算符表達(dá)式 如: Case Is = 10 Case Is = 0 與 Case 0 相同 Select Case格式注意要點(diǎn): 1不可以在Case后的表達(dá)式中使用測試表達(dá)式中的變量。函數(shù)返回值: 所選按鈕的整數(shù)值。并且一次只能對(duì)一個(gè)變量賦值。調(diào)用格式輸出函數(shù) Format()調(diào)用隨機(jī)函數(shù)Rnd生成[a,b] 范圍內(nèi)的隨機(jī)整數(shù): Int ((ba+1)*Rnd+a)調(diào)用將字符轉(zhuǎn)換成ASCII碼值的函數(shù)Asc(N) Acs(“A”) = 65,