计算机二级考试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
-
全国计算机等级二级考试java试题及答案
为了使广大考生在备战计算机等级考试时,更快的掌握相应知识点,下面是小编搜索整理的全国计算机等级二级考试java试题及答案,供参考练习,预祝考生们考出自己理想的成绩!1、如果在创建表中建立需要存放二进制数据文档的字段,其数据类型应当为___D___。A.文本类型B.货...
-
2016计算机二级《Access》选择题题库及答案
(1)在代码中引用一个窗体控件时,应使用的控件属性是()。ionx(2)确定一个窗体大小的属性是()。h和Heighth和Top和Left和Height(3)对话框在关闭前,不能继续执行应用程序的其他部分,这种对话框称为()。A.输入对话框B.输出对话框C.模态对话框D.非模态对话框(4)Access...
-
2016年二级JAVA考试预测试卷及答案
一、基本操作题(共18分)本题分别比较两个字符串"A"和"a"是否相等,并比较两个字符"A"和"a"是否相等,并输出比较结果。publicclassjaval{publicstaticvoidmain(String[]args){;cl=’A’;c2=’a’;Stringstrl=newString("A"),str2=newString("a"...
-
2017年计算机二级考试VB习题及答案
计算机等级证书是我们找工作的敲门砖,现在越来越多人重视计算机等级考试。下面是本站小编为大家带来的2017年计算机二级考试VB习题及答案,希望对大家的学习有帮助!1.在菜单编辑器中建立一个菜单,其主菜单项的名称为mnuEdit,Visible属性为False,程序运行后,如果用鼠标...