月二級(jí)vb等級(jí)考試輔導(dǎo)第7次(存儲(chǔ)版)
【正文】 5 16 C) 15 15 D) 5 6 B) 15 6 P101 考點(diǎn) 1 Sub過(guò)程 一、建立 Sub過(guò)程 [Static][Private|Public] Sub 過(guò)程名 ([參數(shù)表 ]) 語(yǔ)句塊 [Exit Sub] [語(yǔ)句塊 ] End Sub Private Sub abc(x As Integer) If Sgn(x) = 1 Then MsgBox 輸入的是正數(shù) ElseIf Sgn(x) = 1 Then MsgBox 輸入的是負(fù)數(shù) Else MsgBox 輸入的 0 End If End Sub 子程序過(guò)程 P102 調(diào)用 Sub過(guò)程 1. 用 Call語(yǔ)句調(diào)用 Sub過(guò)程 Call 過(guò)程名［（實(shí)際參數(shù)）］ 2. 把過(guò)程名作為一個(gè)語(yǔ)句來(lái)使用 過(guò)程名 實(shí)際參數(shù) 與第一種方式相比，它有兩點(diǎn)不同 : （ 1）去掉關(guān)鍵字 Call； （ 2）去掉 實(shí)際參數(shù) 的括號(hào)。 c。 P103（ 2021年 9月選擇題第 26題） Sub subP(b() As Integer) For i = 1 To 4 b(i) = 2 * i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4) As Integer a(1) = 5 a(2) = 6 a(3) = 7 a(4) = 8 subP a() For i = 1 To 4 Print a(i) Next i End Sub （ A） 2 （ B） 5 （ C） 10 （ D）出錯(cuò) 4 6 12 6 7 14 8 8 16 P109（ 2021年 9月選擇題第 24題） 設(shè)有如下通用過(guò)程： Public Sub Fun(a(), ByVal x As Integer) For i = 1 To 5 x = x + a(i) Next End Sub 在窗體上畫(huà)一個(gè)名稱為 Text1的文本框和一個(gè)名稱為 Command1的命令按鈕，然后編寫(xiě)如下的事件過(guò)程： Private Sub Command1_Click() Dim arr(5) As Variant For i = 1 To 5 arr(i) = i Next n = 10 Call Fun(arr(), n) = n End Sub 程序運(yùn)行后，單擊命令按鈕，則在文本框中顯示的內(nèi)容是 ________。注意，在調(diào)用含有對(duì)象的過(guò)程時(shí)，對(duì)象只能通過(guò)傳地址方式傳送。單擊上述兩個(gè)控件中任一控件，則在標(biāo)簽 Label2中顯示所單擊控件的標(biāo)題內(nèi)容（標(biāo)題內(nèi)容有 “ 單擊 ”二字），下圖是單擊命令按鈕后的窗體外觀。 （ A) Form1的 Caption屬性值為 100 （ B) Form2的 Caption屬性值為 100 （ C) Form1的 Caption屬性值為 100 （ D） Form2的 Caption屬性值為 100 P112（ 2021年 4月選擇題第 28題） 窗體上有名稱分別為 Textl 、 Text2 的 2 個(gè)文本框，要求文本框 Textl 中輸入的數(shù)據(jù)小于 500 ，文本框 Text2 中輸入的數(shù)據(jù)小于 1000 ，否則重新輸入。 Sum a = 10: b = 20: c = 30 Sum=mysum(a, b, c) Print sum=。 A） 6
黨政相關(guān)相關(guān)推薦
鄂ICP備17016276號(hào)-1