日韩欧美另类久久久精品_亚洲大色堂人在线无码_国产三级aⅴ在线播放_在线无码aⅴ精品动漫_国产精品精品国产专区

我要投稿 投訴建議

計算機二級VB考試練習及答案

時間:2022-07-21 01:00:05 計算機等級 我要投稿
  • 相關推薦

計算機二級VB考試練習及答案

  不論從事何種工作,如果要想做出高效、實效,務必先從自身的工作計劃開始。有了計劃,才不致于使自己思想迷茫、頭腦空洞,不知從哪里著手開展工作。下面是小編搜索整理的計算機二級VB考試練習及答案,供大家參考學習!

計算機二級VB考試練習及答案

  計算機二級VB考試練習及答案

  1、在窗體上建立一個名稱為Command1的命令按鈕,一個名稱為Text1的文本框,以及四個單選按鈕:第一個名稱為option1用來設置文本框的字體為"宋體",

  第二個名稱為option2用來設置文本框的字體為"黑體",第三個名稱為option3用來設置文本框的字體大小為8號,第四個名稱為option4用來設置文本框的字體大小為12號。

  程序如下:(程序運行剛開始時,四個單選按鈕都沒有選中)

  Private Sub Command1_Click( )

  Text1.FontName = Iif(Option1.Value, "宋體", "黑體")

  Text1.FontSize = Iif(Option3.Value, 8, 12)

  End Sub

  當程序運行時,先單擊單選按鈕option2,然后單擊命令按鈕command1,則文本框text1的變化效果是(B) (單)

  A.字體設置為宋體

  B.字體設置為黑體

  C.字體大小設置為8號

  D.字體大小設置為12號

  2.在窗體上建立一個名稱為Command1的命令按鈕,一個名稱為Text1的文本框,以及四個單選按鈕:第一個名稱為option1用來設置文本框的字體為"宋體",

  第二個名稱為option2用來設置文本框的字體為"黑體",第三個名稱為option3用來設置文本框的字體大小為8號,第四個名稱為option4用來設置文本框的字體大小為12號。

  程序如下:(程序運行剛開始時,四個單選按鈕都沒有選中)

  Private Sub Command1_Click( )

  Text1.FontName = Iif(Option1.Value, "宋體", "黑體")

  Text1.FontSize = Iif(Option3.Value, 8, 12)

  End Sub

  當程序運行時,先單擊單選按鈕option3,然后單擊命令按鈕command1,則文本框text1的變化效果是(C) (單)

  A.字體設置為宋體

  B.字體設置為黑體

  C.字體大小設置為8號

  D.字體大小設置為12號

  3.在窗體上建立一個名稱為Command1的命令按鈕,一個名稱為Text1的文本框,以及四個單選按鈕:第一個名稱為option1用來設置文本框的字體為"宋體",

  第二個名稱為option2用來設置文本框的字體為"黑體",第三個名稱為option3用來設置文本框的字體大小為8號,第四個名稱為option4用來設置文本框的字體大小為12號。

  程序如下:(程序運行剛開始時,四個單選按鈕都沒有選中)

  Private Sub Command1_Click( )

  Text1.FontName = Iif(Option1.Value, "宋體", "黑體")

  Text1.FontSize = Iif(Option3.Value, 8, 12)

  End Sub

  當程序運行時,先單擊單選按鈕option1,然后單擊命令按鈕command1,則文本框text1的變化效果是(A) (單)

  A.字體設置為宋體

  B.字體設置為黑體

  C.字體大小設置為8號

  D.字體大小設置為12號

  4.在窗體上建立一個名稱為Command1的命令按鈕,一個名稱為Text1的文本框,以及四個單選按鈕:第一個名稱為option1用來設置文本框的字體為"宋體",

  第二個名稱為option2用來設置文本框的字體為"黑體",第三個名稱為option3用來設置文本框的字體大小為8號,第四個名稱為option4用來設置文本框的字體大小為12號。

  程序如下:(程序運行剛開始時,四個單選按鈕都沒有選中)

  Private Sub Command1_Click( )

  Text1.FontName = Iif(Option1.Value, "宋體", "黑體")

  Text1.FontSize = Iif(Option3.Value, 8, 12)

  End Sub

  當程序運行時,先單擊單選按鈕option4,然后單擊命令按鈕command1,則文本框text1的變化效果是(D) (單)

  A.字體設置為宋體

  B.字體設置為黑體

  C.字體大小設置為8號

  D.字體大小設置為12號

  5.在窗體中建立了一個名稱為lstBooks的列表框,一個名稱為txtItem的文本框,四個名稱分別為cmdAdd、cmdDelete、cmdModify、cmdModify_Ok的命令按鈕。

  如下程序:

  Sub Form_Load( )

  lstBooks.AddItem "計算機文化基礎"

  lstBooks.AddItem "VB程序設計教程"

  lstBooks.AddItem "操作系統(tǒng)"

  End Sub

  Sub cmdAdd_Click( )

  lstBooks.AddItem txtItem

  txtItem = ""

  End Sub

  對該程序說法不正確的是(D) (單)

  A.窗體啟動時,在列表框中有三個列表項目,依次為:計算機文化基礎、VB程序設計教程、操作系統(tǒng)

  B.單擊cmdAdd命令按鈕后,把文本框中的信息添加到列表框中

  C.在列表框中添加列表項目的方法為additem方法

  D.以上說法都不正確

  6.在窗體中建立了一個名稱為LSTBOOKS的列表框,一個名稱為txtItem的文本框,四個名稱分別為cmdAdd、cmdDelete、cmdModify、cmdModify_Ok的命令按鈕。如下程序的功能是將修改后的項目送回列表框,替換原項目,實現(xiàn)修改:

  Sub cmdModify_Ok_Click( )

  LSTBOOKS.List【Lstbooks.lstindex】 = txtItem

  txtItem = ""

  End Sub

  7.對以下程序說法不正確的是(C) (單)

  Private Sub Combo1_LostFocus( )

  flag = False

  For i = 0 To Combo1.ListCount - 1

  If Combo1.List(i) = Combo1.Text Then

  flag = True

  Exit For

  End If

  Next i

  If Not flag Then

  Combo1.AddItem Combo1.Text

  End If

  End Sub

  A.當焦點離開組合框時組合框的LostFocus事件被觸發(fā)

  B.添加到組合框的新項目不能永久保存,下次運行該程序中看不到上次保存的`項目,利用該事件過程能夠將輸入的新內容添加到組合框中,下次運行該程序中能夠看到上次保存的項目

  C.邏輯變量flag=true時,表示組合框的項目中有該輸入新項目

  D.邏輯變量flag=false時,表示組合框的項目中有該輸入新項目

  8.窗體中有兩個檢查框名稱分別為check1和check2,一個命令按鈕名稱為command1,一個列表框名稱為list1,兩個單選按鈕名稱分別為option1和option2。如下程序:

  Private Sub Command1_Click( )

  If Check1.Value = 1 Then

  List1.AddItem "品牌:松下"

  List1.AddItem "數(shù)量:3臺"

  End If

  If Check2.Value = 1 Then

  If Option1.Value = True Then

  List1.AddItem "操作系統(tǒng):Windows 2000"

  Else

  List1.AddItem "操作系統(tǒng):Windows 98"

  End If

  End If

  End Sub

  當窗體啟動后,先選中檢查框check1,然后單擊命令按鈕command1,運行效果為(A) (單)

  A.列表框List1中的列表項目分別為:品牌:松下數(shù)量:3臺

  B.列表框List1中的列表項目分別為:操作系統(tǒng):Windows 2000 操作系統(tǒng):Windows 98

  C.沒有任何顯示

  D.以上都不正確

  *9.窗體中有兩個檢查框名稱分別為check1和check2,一個命令按鈕名稱為command1,一個列表框名稱為list1,兩個單選按鈕名稱分別為option1和option2。如下程序:

  Private Sub Command1_Click( )

  If Check1.Value = 1 Then

  List1.AddItem "品牌:松下"

  List1.AddItem "數(shù)量:3臺"

  End If

  If Check2.Value = 1 Then

  If Option1.Value = True Then

  List1.AddItem "操作系統(tǒng):Windows 2000"

  Else

  List1.AddItem "操作系統(tǒng):Windows 98"

  End If

  End If

  End Sub

  當窗體啟動后,先選中檢查框check2(其中單選按鈕option1被選中),然后單擊命令按鈕command1,運行效果為(B)(單)

  A.列表框List1中的列表項目分別為:品牌:松下數(shù)量:3臺

  B.列表框List1中的列表項目分別為:操作系統(tǒng):Windows 2000 操作系統(tǒng):Windows 98

  C.列表框List1中的列表項目為:操作系統(tǒng):Windows 2000

  D.以上都不正確

  53430.窗體中有兩個檢查框名稱分別為check1和check2,一個命令按鈕名稱為command1,一個列表框名稱為list1,兩個單選按鈕名稱分別為option1和option2。如下程序:

  Private Sub Command1_Click( )

  If Check1.Value = 1 Then

  List1.AddItem "品牌:松下"

  List1.AddItem "數(shù)量:3臺"

  End If

  If Check2.Value = 1 Then

  If Option1.Value = True Then

  List1.AddItem "操作系統(tǒng):Windows 2000"

  Else

  List1.AddItem "操作系統(tǒng):Windows 98"

  End If

  End If

  End Sub

  當窗體啟動后,先選中檢查框check2(其中單選按鈕option2被選中),然后單擊命令按鈕command1,運行效果為(B)(單)

  A.列表框List1中的列表項目分別為:品牌:松下數(shù)量:3臺

  B.列表框List1中的列表項目為:操作系統(tǒng):Windows 98

  C.列表框List1中的列表項目為:操作系統(tǒng):Windows 2000

  11 .傳值:形參得到的是實參的值,形參值的改變不會影響實參的值。在定義形參前加關鍵字Byval!

  12.以下利用SUB關鍵字定義的子過程Rate,其調用格式不正確的是(B) (單)

  A.call Rate(12,56)

  B.Rate(12,56)

  C.Rate 12,56

  D.以上A和C正確

  13.如下程序運行后顯示結果為(B) (單)

  Public Temp As integer

  Sub Form_Load( )

  Dim Temp As Integer

  Temp=10

  Form1.Temp=20

  Print Form1.Temp;"和";Temp

  End Sub

  A.10和20

  B.20和10

  C.10和10

  D.20和20

  14.以下對靜態(tài)變量說法不正確的是(D) (單)

  A.定義格式為:Static 變量名 [AS 類型]

  B.在子過程名/函數(shù)名前加Static,表示該過程/函數(shù)體內局部變量全部都是靜態(tài)變量

  C.靜態(tài)變量必須在過程體內定義

  D.靜態(tài)變量可以在窗體的"通用聲明部"定義

  15 .過程在自身定義的內部調用自己本身的結構稱為遞歸!

  16.如下程序功能是求n的階層:

  Function fac(n As Integer) As Integer

  If n = 1 Then

  fac = 1

  Else

  fac = n * fac(n - 1)

  End If

  End Function

  Sub Command1_Click( )

  n=val(inputbox("請輸入數(shù)值"))

  Print "fac(n)=";fac(n)

  End Sub

  以下說法不正確的是(D) (單)

  A.若fac函數(shù)中If n = 1 Then fac = 1沒有,僅有語句:fac = n * fac(n - 1) ,程序運行將會出錯

  B.若輸入的n<=0 ,程序運行將會出錯

  C.若n=4,則輸出結果為:fac(n)=24

  D.以上說法都不正確

  17.利用遞歸求最大公約數(shù)的程序為:

  Public Function gcd(m As Integer, n As Integer) As Integer

  If (m Mod n) = 0 Then

  gcd =【n】

  Else

  gcd = gcd(n, m Mod n)

  End If

  End Function

  Private Sub Form_Click( )

  Print gcd(10, 4)

  End Sub

  18 .以下程序的作用是單擊Check1檢查框將使得Text1文本框的字體在"加粗"和"常規(guī)"之間進行切換!

  Private Sub Check1_Click( )

  Text1.FontBold = Not Text1.FontBold

  End Sub

  *19 .以下程序的作用是單擊Check1檢查框將使得Text1文本框的字體在"加粗"和"常規(guī)"之間進行切換!

  Private Sub Check1_Click( )

  Text1.FontItalic = Not Text1.FontItalic

  End Sub

  *20 .以下程序的作用是單擊Check1檢查框將使得Text1文本框的字體在"加粗"和"常規(guī)"之間進行切換!

  Private Sub Check1_Click( )

  Text1.FontUnderline = Not Text1.FontUnderline

  End Sub

【計算機二級VB考試練習及答案】相關文章:

2016計算機二級考試練習試題及答案08-06

2016計算機二級考試模擬練習題及答案08-07

計算機二級VB考試重點知識08-15

計算機二級考試VB選擇題試題08-09

計算機等級考試二級VB考點:程序調試11-08

2016年計算機二級考試試題VB沖刺題08-06

2016計算機一級考試練習題及答案08-06

2016計算機一級考試《WPS》練習題及答案08-06

2016計算機二級公共基礎知識考試預測題及答案08-06

報檢員考試綜合知識練習題及答案09-25