【正文】
錯誤的是______。 Not a<=c Or4*c=b^2Andb<>a+c A)1 B)1 C)True D)False(15)設(shè)a=5,b=10,則執(zhí)行c=Iht((bA)*Rnd+A)+1后,c值的范圍為______。 A)software and hardware B)software C)hardware D)1(17)在窗體上畫一個命令按鈕和一個文本框,其名稱分別為Command1和Text1,把文本框的Text屬性設(shè)置為空白,然后編寫如下事件過程: Private Sub Command1_Click() a=InputBox(Enter an integer) b=InputBox(Enter an integer) =b+a End Sub 程序運行后,單擊命令按鈕,如果在輸入對話框中分別輸入8和10,則文本框中顯示的內(nèi)容是______。 A)BeijingChina B)Chima C)Beijing D)BeijingC(19)在窗體上畫一個列表框和一個命令按鈕,其名稱分別為List1和Command1,然后編寫如下事件過程 Private Sub Form_Load() Iteml Item2 Item3 End Sub Private Sub Command1_click() ()=AAAA End Sub 程序運行后,單擊命令按鈕,其結(jié)果為______。 A)81 4 B)56 3 C)28 1 D)243 5(21)有如下程序: Ptivate Sub Form_Click() Dim Check,Counter Cbeck=True Counter=0 Do Do While Counter<20 Counter=Counter+1 If Counter=10 Then Check=False Exit Do End If Loop Loop Until Check=False Print Counter, Check End Sub 程序運行后,單擊窗體,輸出結(jié)果為______。 A)12 B)30 C)24 D)18(23)在窗體上畫一個名稱為Text1的文本框和一個名稱為Command1的命令按鈕,然后編寫.如下事件過程: Private Sub Command1_Click() Dim array1(10,10)As Integer Dim i As Integer, j As Integer For i=1 To 3 For j=2 To 4 array1(i,j)=i+j Next j Next i =array1(2,3)+arrayl(3,4) End Sub 程序運行后,單擊命令按鈕,在文本框中顯示的值是______。a2(3,3) End Sub 程序運行后,單擊命令按鈕,在窗體上輸出的是______。 A)25 B)26 C)27 D)28(26)在窗體畫一個命令按鈕,然后編寫如下事件過程: Private Sub Command1_Click() Dim a(5)As String For i=1 To 5 a(I)=Chr(Asc(A)+(i1)) Next i For Each b In a Print b; Next End Sub 程序運行后,單擊命令按鈕,輸出結(jié)果是______。 A)如果不指明函數(shù)過程參數(shù)的類型,則該參數(shù)沒有數(shù)據(jù)類型 B)函數(shù)過程的返回值可以有多個 C)當(dāng)數(shù)組作為函數(shù)過程的參數(shù)時,既能以傳值方式傳遞,也能以引用方式傳遞 D)函數(shù)過程形參的類型與函數(shù)返回值的類型沒有關(guān)系(28)函數(shù)過程n的功能是:如果參數(shù)b為奇數(shù),則返回值為1,否則返回值為0。 A)Function F1(b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End Function B)Function F1(b As Integer) If b Mod 2=