一键复制
人的记忆力会随着岁月的流逝而衰退，写作可以弥补记忆的不足，将曾经的人生经历和感悟记录下来，也便于保存一份美好的回忆。那么我们该如何写一篇较为完美的范文呢？以下是我为大家搜集的优质范文，仅供参考，一起来看看吧
全国计算机二级考试vb语言考试试题及答案篇一
为了使广大考生在备战计算机等级考试时，更快的掌握相应知识点，下面是小编搜索整理的全国计算机等级考试vb语言考试试题，供参考练习，预祝考生们考出自己理想的成绩!
1． 在窗体上画一个名称为command1的命令按钮，然后编写如下事件过程：
private sub command1_click()
dim num as integer
num = 1
do until num > 6
print num;
num = num + 2.4
loop
end sub
程序运行后，单击命令按钮，则窗体上显示的内容是
（a）1 3.4 5.8 （b）1 3 5 （c）1 4 7 （d）无数据输出
2． 有如下函数：
function facn ( x as integer ) as long
dim p as long , i as integer
p = 1
for i = 1 to x
p = p * i
next i
facn = p
end function
调用它的.事件过程如下：
private sub command1_click ( )
i = val ( inputbox ( “请输入数据”))
a = facn (( i ) ) ‘实参i用圆括号括起，则强制为值传递
print a
end sub
若输入数据6，则程序运行结果为（ 【73】 ）
（a）60 （b）120 （c）600 （d）720
3． 在窗体上画一个名称为command1的命令按钮，然后编写如下事件过程：
private sub command1_click()
dim a as integer, s as integer
a = 8
s = 1
do
s = s + a
a = a－1
loop while a <= 0
print s; a
end sub
程序运行后，单击命令按钮，则窗体上显示的内容是
（a） 7 9 （b） 34 0（c）9 7（d）死循环
4． 下列程序的执行结果为（ 【74】 ）
dim intsum as integer , i as integer
intsum = 0
for i = 30.2 to 1 step -5.3
intsum = intsum + i
next i
print intsum
（a）106 （b）105 （c）102 （d）101
5． 在窗体上画一个命令按钮，然后编写如下事件过程，该过程执行结果为（ 【75】 ）
option base 1
private sub command1_click ( )
dim a as variant , s as integer
a = array ( 2 , 4 , 6 , 8 )
j = 1
for i = 1 to 4 step 1
s = s + a ( i ) * j
j = j *10
next i
print s
end sub
（a）0 （b）1110 （c）2468 （d）8642
设有如下通用过程：
public function f(x as integer)
dim y as integer
x = 20
y = 2
f = x * y
end function
6． 在窗体上画一个名称为command1的命令按钮，然后编写如下事件过程：
private sub command1_click()
static x as integer
x = 10
y=5
y = f(x)
print x; y
end sub
程序运行后，如果单击命令按钮，则在窗体上显示的内容是
（a）10 5 （b）20 5 （c）20 40 （d）10 40
7． 对窗体编写如下代码：
option base 1
private sub form_keypress( keyascii as integer)
a = array (123 , 86 , 57 , 248 , 32)
m1 = a ( 1 )
m2 = 1
if keyascii = 13 then
for i=2 to 5
if a ( i ) > m1 then
m1 = a ( i )
m2 = i
end if
next i
end if
print m1 , m2
end sub
程序运行后，按回车键，输出结果为（ 【76】 ）
（a）32 5 （b）248 4 （c）32 1 （d）248 5
设有如下通用过程：
public sub fun(a(), byval x as integer)
for i = 1 to 5
x = x + a(i)
next
end sub
8． 在窗体上画一个名称为text1的文本框和一个名称为command1的命令按钮，然后编写如下的事件过程：
private sub command1_click()
dim arr(5) as variant
for i = 1 to 5
arr(i) = i
next
n = 10
call fun(arr(), n)
= n
end sub
程序运行后，单击命令按钮，则在文本框中显示的内容是
（a）10 （b）15 （c）25 （d）24
9． 阅读程序：
function func ( a as integer )
b = 1
static c as integer
b = b +1
c = c +1
func = a + b + c
end function
private sub command1_click( )
dim a as integer
a = 3
for i =1 to 3
print func( a )
next i
end sub
运行上面的程序，单击命令按钮后，输出结果为（ 【77】 ）
（a）6 （b）6 （c）6 （d）6
7 6 8 13
8 6 10 21
10． 在窗体上画一个名称为command1的命令按钮，然后编写如下代码：
option base 1
private sub command1_click()
d = 0
c = 10
x = array(10, 12, 21, 32, 24)
for i = 1 to 5
if x(i) > c then
d = d + x(i)
c = x(i)
else
d = d－c
end if
next i
print d
end sub
程序运行后，如果单击命令按钮，则在窗体上输出的内容为
（a）89 （b）99 （c）23 （d）77
s("content_relate");【全国计算机二级考试vb语言考试试题】相关文章：
计算机2级考试vb语言考试试题09-22计算机二级vb考试试题10-03全国计算机二级vb考试题库10-03计算机二级考试vb语言程序设计考试题及答案08-312015全国计算机等级考试二级vb语言程序设计考试大纲11-092017计算机二级考试vb基础考试题10-01计算机二级考试vb考试题及答案08-29全国计算机二级考试vb程序设计复习试题09-08计算机二级vb考试测试题09-21
