【正文】
= + 20 Else =0 End If End Sub 程序運(yùn)行后單擊“開始”按鈕,標(biāo)簽在窗體中移動(dòng)。10,100,100) f,Show =y End Sub 運(yùn)行以上程序,正確的結(jié)果是 A.Form1的Caption屬性值為100 B.Form2的Caption屬性值為100 C.Form1的Caption屬性值為100 D.Form2的Caption屬性值為100 (22)在窗體上畫一個(gè)名稱為Command1的命令按鈕,并編寫如下程序: Private Sub Command1_Click() Dim x As Integer Static y As Integer x=10 y=5 Call f1(x,y) Print x,y End Sub Private Sub f1(ByRef x1 As Integer, y1 As Integer) x1=x1+2 y1=y1+2 End Sub 程序運(yùn)行后,單擊命令按鈕,在窗體上顯示的內(nèi)容是 A.10 5 B.12 5 C.10 7 D.12 7 (23)設(shè)有如下程序 Option Base 1 Private Sub Command1_Click() Dim a(10)As Integer Dim n As Integer n=InputBox(輸入數(shù)據(jù)) If n%26lt。然后編寫如下事件過程: Private Sub Command1_Click() = =All file|*.*|(*.Do C.|*.Doc|(*.Txt)|*.Txt =2 =VBTest =1 End Sub 對(duì)于這個(gè)程序,以下敘述中錯(cuò)誤的是 A.該對(duì)話框被設(shè)置為“打開”對(duì)話框 B.在該對(duì)話框中指定的默認(rèn)文件名為空 C.該對(duì)話框的標(biāo)題為VBTest D.在該對(duì)話框中指定的默認(rèn)文件類型為文本文件(*.Txt)(21)設(shè)一個(gè)工程由兩個(gè)窗體組成,其名稱分別為Form1和Form2,在Form1上有一個(gè)名稱為Command1的命令按鈕。pen (5)在窗體上畫一個(gè)名稱為Command1的命令按鈕,然后編寫如下事件過程: Private Sub Command1_Click() x=InputBox(Input) Select Case x Case 1,3 Print 分支 1 Case Is %26gt。pen C.把Name屬性設(shè)置為%26amp。若要為該菜單命令設(shè)置訪問鍵,即按下Alt及字母O時(shí),能夠執(zhí)行Open命令,則在菜單編輯器中設(shè)置“Open命令的方式是 A.把Caption屬性設(shè)置為%26amp。程序運(yùn)行后,如果移動(dòng)滾動(dòng)框,則在文本框中顯示滾動(dòng)條的當(dāng)前值,如圖所示。2004年9月全國(guó)計(jì)算機(jī)等級(jí)考試二級(jí)VB語(yǔ)言筆試試題及答案 一、選擇題 ((1)~(20)每小題2分,(21)~(30)每小題3分,共70分下列各題 A)、 B)、C)、D)四個(gè)選項(xiàng)中,只有一個(gè)選項(xiàng)是正確的,請(qǐng)將正確選項(xiàng)填涂在答題卡相應(yīng)位置上,答在試卷上不得分。 (1)設(shè)窗體上有一個(gè)文本框,名稱為text1,程序運(yùn)行后,要求該文本框只能顯示信息,不能接受輸入的信息,以下能實(shí)現(xiàn)該操作的語(yǔ)句是 A.=0 B.=Flase C.=Flase D.=0 (2)以下能在窗體Form1的標(biāo)題欄中顯示“VisualBasic窗體的語(yǔ)句是 A.=VisualBasic窗體 B.=VisualBasic窗體 C.=VisualBasic窗體 D.=VisualBasic窗體” (3)在窗體上畫一個(gè)名稱為Text1的文本框,然后畫一個(gè)名稱為HScroll1的滾動(dòng)條,其Min和Max屬性分別為0和100。 以下能實(shí)現(xiàn)上述操作的程序段是 A.Private Sub Hscroll1_Change() = End Sub B.Private Sub Hscroll1_Click() = End Sub C.Private Sub