<span id="1jbx9"></span>
<strike id="1jbx9"><dl id="1jbx9"></dl></strike>
<strike id="1jbx9"></strike>
<strike id="1jbx9"></strike>
<span id="1jbx9"></span>
<ruby id="1jbx9"></ruby><strike id="1jbx9"><i id="1jbx9"></i></strike>
<ruby id="1jbx9"></ruby>
<strike id="1jbx9"><dl id="1jbx9"><cite id="1jbx9"></cite></dl></strike><span id="1jbx9"></span><strike id="1jbx9"><i id="1jbx9"></i></strike>
問答題庫

當前位置: 計算機等級考試題庫 > BASIC題庫

問題描述:

[單項選擇題] 在窗體上畫一個名稱為Command1的命令按鈕,編寫如下程序: Private Sub Command1_Click() Print p1(3,7) End Sub Public Function p1(x As Single,n As Integer) As Single If n=0 Then p1=1 Else If n Mod 2=1 Then p1=x*x+n Else p1=x*x-n End If End If End Function 程序運行后,單擊該命令按鈕,屏幕上顯示的結果是( )。


A.2
B.1
C.0
D.16

現有程序如下: Option Base 1 Private Sub Form_Click() Dim x(5, 6)As Integer, y(5)As Integer For i = 1 To 5For j =1 To 6 x(i, j) = Int(Rnd * 9+1)Next j Next i Call f(5, 6, x, y) For i=1 To 5Print y(i); Next i End Sub Sub f(m As Integer, n As Integer, a()As Integer, b()As Integer) For i = 1 To mb(i) =0For j = 1 To nb(i) =b(i) +a(i, j)Next j Next i End Sub 關于上述程序,以下敘述中正確的是( )。 Jackson結構化程序設計方法是英國的M. Jackson提出的,它是一種面向 【3】 的設計方法。 對窗體編寫如下事件過程: Private Sub Form_ MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)If Button =2 Then Print “AAAAA”End If End Sub Private Sub Form_ MouseUp (Button As Integer,Shift As Integer,X As Single,Y As Single) Print “BBBBB” End Sub 程序運行后,如果單擊鼠標右鍵,則輸出結果為______ 。 類是一個支持集成的抽象數據類型,而對象是類的 【3】 。 在窗體上添加一命令按鈕,其名為Command1,然后編寫代碼如下。 private Sub Command1_Click() Dim arr(5)As Integer,arr1(5)As Integern=3For i=1 To 5 an(i)=i arrl(n)=2*n+iNextPrint arr1(n);arr(n) End Sub 程序的運行結果為

點評難度:

      

您覺得難度如何呢?請反饋給我們,謝謝!

參考答案:

D

試題分享:

相關考題

国产精品国产三级国产专区,大屁股大乳丰满人妻,中文字幕 日韩 无码 在线,日本不卡高清免费中文AV