<menuitem id="r3jhr"></menuitem><noscript id="r3jhr"><progress id="r3jhr"><code id="r3jhr"></code></progress></noscript>

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

      時間:2022-08-29 22:07:09 試題 我要投稿
      • 相關推薦

      計算機二級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考試練習題及答案05-04

      計算機考試題及答案08-11

      有關計算機語言與VB語言簡介的教學反思11-24

      大一計算機考試題及答案02-23

      保安考試題及答案02-10

      消防的考試題及答案10-01

      化學考試題及答案09-25

      安全培訓考試題及答案03-09

      員工消防考試題及答案12-09

      消防基礎考試題及答案11-04

      久久亚洲中文字幕精品一区四_久久亚洲精品无码av大香_天天爽夜夜爽性能视频_国产精品福利自产拍在线观看
      <menuitem id="r3jhr"></menuitem><noscript id="r3jhr"><progress id="r3jhr"><code id="r3jhr"></code></progress></noscript>
        在线观看国产不卡秒播AV | 日本免费一区二区三区中文字幕 | 亚洲人成午夜网站在线看 | 最新国产国语对白 | 午夜国产精品500 | 亚洲高潮痉挛中文字幕 |