計算機二級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

    国产一级a爱做免费播放_91揄拍久久久久无码免费_欧美视频在线播放精品a_亚洲成色在线综合网站免费

      亚洲精品在线视频中文网 | 天啪天天久久久久久久久噜噜 | 中文字幕自拍vr一区二区三区 | 亚洲а∨天堂在线网站 | 亚洲一级一区二区三 | 亚洲国产区男人本色vr |