计算机二级考试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年计算机二级MSOffice模拟试题(含答案)
本文为大家整理的是2016关于计算机二级MSOffice考试题库及答案,希望能给大家带来帮助!一、选择题1下面描述中,不属于软件危机表现的是()。A.软件过程不规范B.软件开发生产率低C.软件质量难以控制D.软件成本不断提高参考答案:A参考解析:软件危机主要表现在:软件需求...
-
2017年9月计算机二级考试C++考前测试题及答案
导语:C++这个词在中国大陆的程序员圈子中通常被读做“C加加”,而西方的程序员通常读做“Cplusplus”,“CPP”。它是一种使用非常广泛的计算机编程语言。以下是小编为大家精心整理的2017年9月计算机二级考试C++考前测试题及答案,欢迎大家参考!1).下面关于C++流的叙...
-
2016年计算机二级《C语言程序设计》考试大纲
为帮助考生们更好、更有准备地参加计算机二级C语言考试,下面是本站小编搜索整理的关于二级《C语言程序设计》考试大纲,欢迎参考复习,希望对大家有所帮助!想了解更多相关信息请持续关注我们应届毕业生考试网!全国计算机等级考试二级C语言程序设计考试大纲(2013年版...
-
2007年3月全国计算机等级考试二级VB笔试真题
一、选择题(第小题2分,共70分)下列各题A)、B)、C)、D)四个选项中,只有一个选项是正确的。请将正确选项填涂在答题卡相应位置上,答在试卷上不得分。(1)下列叙述中正确的是(B)A)算法的效率只与问题的规模有关,而与数据的存储结构无关B)算法的时间复杂度是指执行算法...