計算機二級考試VB練習題及答案
為了使廣大考生在備戰計算機等級考試時,更快的掌握相應知識點,下面是小編搜尋整理的計算機二級考試VB練習題及答案,供參考練習,預祝考生們考出自己理想的成績!
計算機二級考試VB練習題及答案
1.以下程式是求最大公約數和最小公倍數的程式,在【】處填寫合適的關係運算符。
Private Sub Form_Click( )
Dim m1, n1, m, n, r As Integer
n1 = InputBox("輸入自然數n", "輸入數")
m1 = InputBox("輸入自然數m", "輸入數")
n = n1
m = m1
If m<n p="" then<="">
t = m: m = n: n = t
End If
r = m Mod n
Do While r 【<>】 0
m = n
n = r
r = m Mod n
Loop
Print "最大公約數=", n
Print "最小公倍數= ", m1 * n1 / n
End Sub
2.下面是求100以內素數的程式。
Private Sub Command1_Click( )
Dim i As Integer, m As Integer, tag As Boolean
For m = 2 To 100
tag = True
For i = 2 To m - 1
If m Mod 【i】 = 0 Then tag = False
Next i
If tag Then Print m
Next m
End Sub
3.下面是求100以內素數的程式,下面說法正確的是(A)(單)
Private Sub Command1_Click( )
Dim i As Integer, m As Integer, tag As Boolean
For m = 2 To 100
tag = True
For i = 2 To m - 1
If m Mod i = 0 Then tag = False
Next i
If tag=true Then Print m
Next m
End Sub
為true時,表示m是素數
為false時,表示m是素數
C.語句m Mod i = 0,說明m是素數
D.以上說法都不正確
4.百元買百雞問題: 假定小雞每隻5角,公雞每隻2元,母雞每隻3元。現在有100元錢要求買100只雞,以下程式列出了所有可能的購雞方案。
Private Sub Command2_Click( )
Dim x%, y%, z%
For x = 0 To 33
For y = 0 To 50
If 3 * x + 2 * y + 0.5 * (100 - x - y) = 100 Then
t x, y, 【100-x-y,10-y-x】
End If
Next y
Next x
End Sub
5.百元買百雞問題: 假定小雞每隻5角,公雞每隻2元,母雞每隻3元。現在有100元錢要求買100只雞,以下程式列出了所有可能的購雞方案。
Private Sub Command1_Click( )
Dim x%, y%, z%
For x = 0 To 33
For y = 0 To 50
For z = 0 To 100
If 3 * x + 2 * y + 0.5 * z = 100 And 【x+y+z=100】 Then
t x, y, z
End If
Next z
Next y
Next x
End Sub
6.隨機產生10個100~200之間的數,求它們的最大值程式如下:
Private Sub Command1_Click( )
Max = 100
For i = 1 To 10
x = Int(Rnd * 101 + 100)
Print x;
If x > Max Then 【】
Next i
Print "最大值="; Max
End Sub
在此程式中,其中【】處應該填寫的是(C)(單)
= 100
=200
= x
= 0
7.隨機產生10個100~200之間的數,求它們的最大值程式如下:
Private Sub Command1_Click( )
Max = 100
For i = 1 To 10
x = int【RND*101+100或100+RND*101或RND()*101+100或100+RND()*101】
Print x;
If x > Max Then Max=x
Next i
Print "最大值="; Max
End Sub
8.隨機產生10個100~200之間的數,求它們的最大值程式如下:
Private Sub Command1_Click( )
Max = 100
For I = 1 To 10
x =Int(Rnd * 101 + 100)
Print x;
If 【】 Then Max=x
Next I
Print "最大值="; Max
End Sub
在【】處應該填寫的是:(A)(單)
A.x > Max
B.x<max< p="">
C.x = Max
D.以上都不正確
9.以下是求1~100之間5或7的倍數的和,如下程式段:
Sum = 0
For i = 1 To 100
If i Mod 5 = 0 Or i Mod 7 = 0 Then
【】
End If
Next i
Print Sum
其中【】處書寫正確的是(B)(單)
= i
= Sum + i
= Sum + 5+7
D.以上都不正確
10.以下是求1~100的5或7的倍數的和程式段:
Sum = 0
For i = 1 To 100
If i Mod 5 = 0 Or i 【mod】 7=0 Then
Sum = Sum + i
End If
Next i
Print Sum
11.以下敘述中錯誤的是(B)(單)
al Basic 是事件驅動型視覺化程式設計工具
al Basic應用程式不具有明顯的開始和結束語句
al Basic工具箱中的所有控制元件都具有寬度(Width)和高度(Height)屬性
al Basic中控制元件的某些屬性只能在執行時設定
12.以下敘述中錯誤的是(A)(單)
A.在工程資源管理器視窗中只能包含一個工程檔案及屬於該工程的其他檔案
B.以為副檔名的檔案是標準模組檔案
C.窗體檔案包含該窗體及其控制元件的屬性
D.一個工程中可以含有多個標準模組檔案
13.以下敘述中錯誤的是(B)(單)
A.雙擊滑鼠可以觸發DblClick事件
B.在程式設計過程中,窗體或控制元件的事件的.名稱可以由程式設計人員自由確定
C.移動滑鼠時,會觸發MouseMove事件
D.控制元件的名稱可以由程式設計人員設定
14.以下不屬於Visual Basic系統的檔案型別是(B)(單)
15.以下敘述中錯誤的是(C)(單)
A.開啟一個工程檔案時,系統自動裝入與該工程有關的窗體、標準模組等檔案
B.儲存Visual Basic程式時,應分別儲存窗體檔案及工程檔案
al Basic應用程式只能以解釋方式執行
D.事件可以由使用者引發
16.以下宣告語句中錯誤的是(B)(單)
t var1=123
var2 = 'ABC'
ic a,b as integer
ic a as single
17.設窗體上有一個列表框控制元件List1,且其中含有若干列表項。則以下能表示當前被選中的列表項內容的是(D)(單)
Index
x
18.程式執行後,在窗體上單擊滑鼠,此時窗體不會接收到的事件是(C)(單)
eDown
eUp
k
19.設a=10,b=5,c=1,執行語句Print a >b > c後,窗體上顯示的是(B)(單)
e
C.1
D.出錯資訊
20.如果要改變窗體的標題,則需要設定窗體的(A)屬性(單)
ion
Color
erStyle
-
2016計算機二級考試C++複習題及答案
全國計算機等級考試是由教育部考試中心主辦,面向社會,用於考查非計算機專業應試人員計算機應用知識與技能的全國性計算機水平考試體系,每年開考兩次。3月份的考試馬上就要到來,下面本站小編為搜尋整理了計算機二級考試C++複習題及答案,希望對你備考有所幫助!1.假設...
-
2015年9月全國計算機二級C++筆試全真模擬題
點選檢視試題答案及解析一、選擇題(每小題2分,共70分)下列各題A)、B)、C)、D)四個選項中,只有一個選項是正確的,請將正確選項塗寫在答題卡相應位置上,答在試卷上不得分。(1)下列敘述中錯誤的是A)二叉樹不是線性結構B)線性表是非線性結構C)線性連結串列是線性結構D)棧與...
-
計算機二級《MS Office》判斷習題及答案
計算機二級考試是全國計算機等級考試四個等級中的一個等級,由教育部考試中心主辦,考核計算機基礎知識和使用一種高階計算機語言編寫程式以及上機除錯的基本技能。下面是小編整理的計算機二級《MSOffice》判斷習題及答案,歡迎大家閱讀學習。計算機二級《MSOffice》...
-
2015下半年全國計算機二級vf考試預測題(附答案)
一、選擇題(每小題1分,共40分)1在VisualFoxPr0的查詢設計器中對應的SQL短語WHERE的選項卡是()。A.欄位B.連線C.篩選D.雜項本題共1分,參考答案:C系統解析:查詢設計器介面包含欄位、連線、篩選、排序依據、分組依據和雜項6個選項卡,其中篩選對應於WHERE短語,用於指定...