<pre id="bbfd9"><del id="bbfd9"><dfn id="bbfd9"></dfn></del></pre>

          <ruby id="bbfd9"></ruby><p id="bbfd9"><mark id="bbfd9"></mark></p>

          <p id="bbfd9"></p>

          <p id="bbfd9"><cite id="bbfd9"></cite></p>

            <th id="bbfd9"><form id="bbfd9"><dl id="bbfd9"></dl></form></th>

            <p id="bbfd9"><cite id="bbfd9"></cite></p><p id="bbfd9"></p>
            <p id="bbfd9"><cite id="bbfd9"><progress id="bbfd9"></progress></cite></p>
            試題

            計算機二級VB語言程序設計考試題及答案

            時間:2025-03-24 15:07:16 試題 我要投稿

            計算機二級VB語言程序設計考試題及答案

              程序設計是VB考試比較難的一道題,下面小編為大家帶來了計算機二級VB語言程序設計考試題及答案,歡迎大家閱讀!

            計算機二級VB語言程序設計考試題及答案

              計算機二級VB語言程序設計考試題及答案

              1.在窗體上畫一個名稱為Text1的文本框,一個名稱為Command1的命令按鈕,然后編寫如下事件過程和通用過程:

              Private Sub Command1_Click( )

              n = Val(Text1.Text)

              If n2 = n/2 Then

              f = f1(n)

              Else

              f = f2(n)

              End If

              Print f; n

              End Sub

              Public Function f1(ByRef x)

              x=x*x

              f1=x+x

              End Function

              Public Function f2(ByVal x)

              x=x*x

              f2=x+x+x

              End Function

              程序運行后,在文本框中輸入3,然后單擊命令按鈕,窗體上顯示的是(D)(單)

              A.72 36

              B.108 36

              C.72 6

              D.27 3

              2.在窗體上畫一個名稱為Command1的命令按鈕,然后編寫如下事件過程:

              Private Sub Command1_Click( )

              c = "1234"

              For i = 1 To 4

              c1 = Trim(Str( ))

              Print c1

              Next i

              End Sub

              程序運行后,單擊命令按鈕,要求在窗體上顯示如下內容

              1

              12

              123

              1234

              則在下劃線處應填入的內容為(B)(單)

              A.Right(c1,i)

              B.Left(c1,i)

              C.Mid(c1,i,1)

              D.Mid(c1,i,i)

              3.在窗體上畫一個名稱為Command1的命令按鈕和一個名稱為Text1的文本框,然后編寫如下事件過程:

              Private Sub Command1_Click( )

              n = Val(Text1.Text)

              For i = 2 To n

              For j = 2 To sqr(i)

              If i Mod j = 0 Then Exit For

              Next j

              If j >Sqr(i) Then Print i

              Next i

              End Sub

              該事件過程的功能是(C)(單)

              A.輸出n以內的奇數

              B.輸出n以內的偶數

              C.輸出n以內的素數

              D.輸出n以內能被j整除的數

              4.在窗體上畫一個名稱為Command1的命令按鈕,然后編寫如下通用過程和命令按鈕的事件過程:

              Private Function f(m As Integer)

              If m Mod 2 = 0 Then

              f = m

              Else

              f = 1

              End If

              End Function

              Private Sub Command1_Click( )

              Dim i As Integer

              s = 0

              For i = 1 To 5

              s = s + f(i)

              Next

              Print s

              End Sub

              程序運行后,單擊命令按鈕,在窗體上顯示的是(C)(單)

              A.11

              B.10

              C.9

              D.8

              5.在窗體上畫一個名稱為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

              Text1.Text = array1(2, 3) + array1(3, 4)

              End Sub

              程序運行后,單擊命令按鈕,在文本框中顯示的`值是(D)(單)

              A.15

              B.14

              C.13

              D.12

              6.Visual Basic應用程序中標準模塊文件的擴展名是【BAS或.BAS】(注意不要寫點)。

              7.在菜單編輯器中建立一個菜單,其主菜單項的名稱為mnuEdit,Visible屬性為False,程序運行后,如果用鼠標右鍵單擊窗體,則彈出與mnuEdit相應的菜單。

              Private Sub Form_ 【mousedown】 (Button As Integer, Shift As Integer, X As Single, Y As Single)

              If Button=2 Then

              popupmenu mnuEdit

              End If

              End Sub

              8.在菜單編輯器中建立一個菜單,其主菜單項的名稱為mnuEdit,Visible屬性為False,程序運行后,如果用鼠標右鍵單擊窗體,則彈出與mnuEdit相應的菜單。以下是實現上述功能的程序,請填空。

              Private Sub Form mousedown (Button As Integer, Shift As Integer, X As Single, Y As Single)

              If Button=2 Then

              【popupmenu】 mnuEdit

              End If

              9.為了使計時器控件Timer1每隔0.5秒觸發一次Timer事件,應將Timer1控件的【Interval】屬性設置為500。

              10.為了使計時器控件Timer1每隔0.5秒觸發一次Timer事件,應將Timer1控件的Interval屬性設置為【500】。

            【計算機二級VB語言程序設計考試題及答案】相關文章:

            二級計算機VB語言程序設計考試題及答案09-20

            計算機二級考試VB語言程序設計考試題及答案05-08

            2016計算機二級VB語言考試題與答案10-21

            計算機二級VB考試題及答案10-30

            計算機二級VB語言程序設計單選題及答案08-21

            計算機二級VB語言程序設計練習題及答案11-02

            計算機二級考試VB考試題及答案08-28

            計算機二級VB考試題含答案11-03

            2017計算機二級VB考試題及答案10-11

                    <pre id="bbfd9"><del id="bbfd9"><dfn id="bbfd9"></dfn></del></pre>

                    <ruby id="bbfd9"></ruby><p id="bbfd9"><mark id="bbfd9"></mark></p>

                    <p id="bbfd9"></p>

                    <p id="bbfd9"><cite id="bbfd9"></cite></p>

                      <th id="bbfd9"><form id="bbfd9"><dl id="bbfd9"></dl></form></th>

                      <p id="bbfd9"><cite id="bbfd9"></cite></p><p id="bbfd9"></p>
                      <p id="bbfd9"><cite id="bbfd9"><progress id="bbfd9"></progress></cite></p>
                      飘沙影院