计算机等级考试二级vb试试题副本Word下载.docx
- 文档编号:3330467
- 上传时间:2023-05-01
- 格式:DOCX
- 页数:21
- 大小:159.94KB
计算机等级考试二级vb试试题副本Word下载.docx
《计算机等级考试二级vb试试题副本Word下载.docx》由会员分享,可在线阅读,更多相关《计算机等级考试二级vb试试题副本Word下载.docx(21页珍藏版)》请在冰点文库上搜索。
b)数据管理语言
c)数据操纵语言
d)数据控制语言
(8)在学生管理的关系数据库中,存取一个学生信息的数据单位是
a)文件
b)数据库
c)字段
d)记录
(9)数据库设计中,用e-r图来描述信息结构但不涉及信息在计算机中的表示,它属于数据库设计的
a)需求分析阶段
b)逻辑设计阶段
c)概念设计阶段
d)物理设计阶段
(10)有两个关系r和t如下:
则由关系r得到关系t的操作是
a)选择
b)投影
c)交
d)并
(11)在vb集成环境中要结束一个正在运行的工程,可单击工具栏上的一个按钮,这个按钮是
(12)设x是整型变量,与函数ⅱf(x>
0,-x,x)有相同结果的代数式是
a)|x|
b)-|x|
c)x
d)-x
(13)设窗体文件中有下面的事件过程:
privatesubcommand1_click()
dims
a%=100
printa
endsub
其中变量a和s的数据类型分别是
a)整型,整型
b)变体型,变体型
c)整型,变体型
d)变体型,整型
(14)下面哪个属性肯定不是框架控件的属性
a)text
b)caption
c)left
d)enabled
(15)下面不能在信息框中输出“vb”的是
a)msgbox"
vb"
b)x=msgbox("
)
c)msgbox("
d)callmsgbox"
(16)窗体上有一个名称为option1的单选按钮数组,程序运行时,当单击某个单选按钮时,会调用下面的事件过程
privatesuboption1_c1ick(indexasinteger)
…
下面关于此过程的参数index的叙述中正确的是
a)index为1表示单选按钮被选中,为o表示未选中
b)index的值可正可负
c)index的值用来区分哪个单选按钮被选中
d)index表示数组中单选按钮的数量
(17)设窗体中有一个文本框text1,若在程序中执行了text1.setfocus,则触发
a)text1的setfocus事件
b)text1的gotfocus事件
c)text1的lostfocus事件
d)窗体的gotfocus事件
(18)vb中有3个键盘事件:
keypress、keydown、keyup,若光标在text1文本框中,则每输入一个字母
a)这3个事件都会触发
b)只触发keypress事件
c)只触发keydown、keyup事件
d)不触发其中任何一个事件
(19)下面关于标准模块的叙述中错误的是
a)标准模块中可以声明全局变量
b)标准模块中可以包含一个submain过程,但此过程不能被设置为启动过程
c)标准模块中可以包含一些public过程
d)一个工程中可以含有多个标准模块
(20)设窗体的名称为form1,标题为win,则窗体的mousedown事件过程的过程名是
a)form1_mousedown
b)win_mousedown
c)form_mousedown
d)mousedown_form1
21)下面正确使用动态数组的是
a)dimarr()asinteger
redimarr(3,5)
b)dimarr()asinteger
redimarr(50)asstring
c)dimarr()
redimarr(50)asinteger
d)dimarr(50)asinteger
redimarr(20)
(22)下面是求最大公约数的函数的首部
functiongcd(byvalxasinteger,byvalyasinteger)asinteger
若要输出8、12、16这3个数的最大公约数,下面正确的语句是
a)printgcd(8,12),gcd(12,16),gcd(16,8)
b)printgcd(8,12,16)
c)printgcd(8),gcd(12),gcd(16)
d)printgcd(8,gcd(12,16))
(23)有下面的程序段,其功能是按图1所示的规律输出数据
dima(3,5)asinteger
fori=1to3
forj=1to5
a(i,j)=i+j
printa(i,j);
next
若要按图2所示的规律继续输出数据,则接在上述程序段后面的程序段应该是
a)fori=1to5
forj=1to3
printa(j,i);
b)fori=1to3
c)forj=1to5
d)fori=1to5
next
(24)窗体上有一个text1文本框,一个command1命令按钮,并有以下程序
privatesubcommandl_click()
dimn
iftext1.text<
>
"
23456"
then
n=n+1
print"
口令输入错误"
&
n&
"
次"
endif
希望程序运行时得到左图所示的效果,即:
输入口令,单击“确认口令”命令按钮,若输入的口令不是“”,则在窗体上显示输入错误口令的次数。
但上面的程序实际显示的是右图所示的效果,程序需要修改。
下面修改方案中正确的是
a)在dimn语句的下面添加一句:
n=o
b)把print"
改为print"
+n+"
c)把print"
&
str(n)&
d)把dimn改为staticn
(25)要求当鼠标在图片框p1中移动时,立即在图片框中显示鼠标的位置坐标。
下面能正确实现上述功能的事件过程是
a)privatesubp1_mousemove(buttonasinteger,shiftasinteger,xassingle,yassingle)
printx,y
b)privatesubp1_mousedown(buttonasinteger,shiftasinteger,xassingle,yassingle)
picture.printx,y
c)privatesubp1_mousemove(buttonasinteger,shiftasinteger,xassingle,yassingle)
p1.printx,y
d)privatesubform_mousemove(buttonasinteger,shiftasinteger,xassingle,yassingle)
(26)计算二的近似值的一个公式是
。
某人编写下面的程序用此公式计算并输出π的近似值:
privatesubcomand1_click()
pi=1
sign=1
n=20000
fork=3ton
sign=-sign/k
pi=pi+sign/k
nextk
printpi*4
运行后发现结果为3.22751,显然,程序需要修改。
a)把fork=3ton改为fork=1ton
b)把n=20000改为n=
c)把fork=3ton改为fork=3tonstep2
d)把pi=1改为pi=0
(27)下面程序计算并输出的是
a=10
s=0
do
s=s+a*a*a
a=a-1
loopuntila<
=0
prints
a)13+23+33+…+103的值
b)10!
+…+3!
+2!
+1!
的值
c)(1+2+3+…+10)3的值
d)10个103的和
(28)若在窗体模块的声明部分声明了如下自定义类型和数组
privatetyperec
codeasinteger
captionasstring
endtype
dimarr(5)asrec
则下面的输出语句中正确的是
a)printarr.code
(2),arr.caption
(2)
b)printarr.code,arr.caption
c)printarr
(2).code,arr
(2).caption
d)printcode
(2),caption
(2)
(29)设窗体上有一个通用对话框控件cd1,希望在执行下面程序时,打开如图所示的文件对话框
cd1.dialogtitle="
打开文件"
cd1.initdir="
c:
\"
cd1.filter="
所有文件|*.*|word文档|*.doc|文本文件|*.txt"
cd1.filename="
cd1.action=1
ifcd1.filename="
then
print"
未打开文件"
else
要打开文件"
cd1.filename
endsub
但实际显示的对话框中列出了c:
\下的所有文件和文件夹,“文件类型”一栏中显示的是“所有文件”。
下面的修改方案中正确的是
a)把cd1.action=1改为cd1.action=2
b)把“cd1.filter=”后面字符串中的“所有文件”改为“文本文件”
c)在语句cd1.action=1的前面添加:
cd1.filterindex=3
d)把cd1.filename="
改为cd1.filename="
文本文件"
(30)下面程序运行时,若输入395,则输出结果是
dimx%
x=inputbox("
请输入一个3位整数"
printxmod10,x\100,(xmod100)\10
a)395
b)539
c)593
d)359
(31)窗体上有list1、list2两个列表框,list1中有若干列表项(见图),并有下面的程序:
fork=list1.listcount-1to0step-1
iflist1.selected(k)then
list2.additemlist1.list(k)
list1.removeitemk
程序运行时,按照图示在list1中选中2个列表项,然后单击commandl命令按钮,则产生的结果是
a)在list2中插入了“外语”、“物理”两项
b)在list1中删除了“外语”、“物理”两项
c)同时产生a)和b)的结果
d)把list1中最后1个列表项删除并插入到list2中
(32)设工程中有2个窗体:
form1、form2,form1为启动窗体。
form2中有菜单。
其结构如表。
要求在程序运行时,在form1的文本框text1中输入口令并按回车键(回车键的ascii码为13)后,隐藏form1,显示form2。
若口令为“teacher”,所有菜单项都可见;
否则看不到“成绩录入”菜单项。
为此,某人在form1窗体文件中编写如下程序:
privatesubtext1_keypress(keyasciiasinteger)
ifkeyascii=13then
iftext1.text="
teacher"
form2.input.visible=true
form2.input.visible=false
form1.hide
form2.show
程序运行时发现刚输入口令时就隐藏了form1,显示了form2,程序需要修改。
a)把form1中text1文本框及相关程序放到form2窗体中
b)把form1.hide、form2.show两行移到2个endif之间
c)把ifkeyascii=13then改为ifkeyascii="
teaeher"
d)把2个form2.input.visible中的“form2”删去
(33)某人编写了下面的程序,希望能把text1文本框中的内容写到out.txt文件中
open"
out.txt"
foroutputas#2
text1"
close#2
调试时发现没有达到目的,为实现上述目的,应做的修改是
a)把print"
改为print#2,text1
改为printtext1
改为write"
d)把所有#2改为#1
(34)窗体上有一个名为command1的命令按钮,并有下面的程序:
dimarr(5)asinteger
fork=1to5
arr(k)=k
progarr()
printarr(k)
subprog(a()asinteger)
n=ubound(a)
fori=nto2step-1
forj=1ton-1
ifa(j)
t=a(j):
a(j)=a(j+1):
a(j+1)=t
nextj
nexti
程序运行时,单击命令按钮后显示的是
a)12345
b)54321
c)01234
d)43210
(35)下面程序运行时,若输入“visualbasicprogramming”,则在窗体上输出的是
dimcount(25)asinteger,chasstring
ch=ucase(inputbox("
请输入字母字符串"
))
fork=1tolen(ch)
n=asc(mid(ch,k,1))-asc("
a"
ifn>
=0then
count(n)=count(n)+1
m=count(0)
fork=1to25
ifm
m=count(k)
printm
a)0
b)1
c)2
d)3
二、填空题
(1)一个队列的初始状态为空。
现将元素a,b,c,d,e,f,5,4,3,2,1依次入队,然后再依次退队,则元素退队的顺序为【1】。
(2)设某循环队列的容量为50,如果头指针front=45(指向队头元素的前一位置),尾指针rear=10(指向队尾元素),则该循环队列中共有【2】个元素。
(3)设二叉树如下:
对该二叉树进行后序遍历的结果为【3】。
(4)软件是【4】、数据和文档的集合。
(5)有一个学生选课的关系,其中学生的关系模式为:
学生(学号,姓名,班级,年龄),课程的关系模式为:
课程(课号,课程名,学时),其中两个关系模式的键分别是学号和课号,则关系模式选课可定义为:
选课(学号,【5】,成绩)。
(6)为了使复选框禁用(即呈现灰色),应把它的value属性设置为【6】。
(7)在窗体上画一个标签、一个计时器和一个命令按钮,其名称分别为labl1、timer1和command1,如图1所示。
程序运行后,如果单击命令按钮,则标签开始闪烁,每秒钟“欢迎”二字显示、消失各一次,如图2所示。
以下是实现上述功能的程序,请填空。
privatesubform_load()
label1.caption="
欢迎"
timer1.enabled=false
timer1.interval=【7】
privatesubtimer1_timer()
label1.visible=【8】
【9】
(8)有如下程序:
privatesubform_click()
n=10
i=0
i=i+n
n=n-2
loopwhilen>
2
printi
程序运行后,单击窗体,输出结果为【10】。
(9)在窗体上画一个名称为command1的命令按钮。
然后编写如下程序:
optionbase1
dima(10)asinteger
fori=1to10
a(i)=i
callswap(【11】)
printa(i);
subswap(b()asinteger)
n=ubound(b)
fori=1ton/2
t=b(i)
b(i)=b(n)
b(n)=t
【12】
上述程序的功能是,通过调用过程swap,调换数组中数值的存放位置,即a
(1)与a(10)的值互换,a
(2)与a(9)的值互换,……。
请填空。
(10)在窗体上画一个文本框,其名称为text1,在属性窗口中把该文本框的multiline属性设置为true,然后编写如下的事件过程:
d:
\test\smtext1.txt"
forinputas#1
dowhilenot【13】
lineinput#1,aspect$
whole$=whole$+aspect$+chr$(13)+chr$(10)
loop
text1.text=whole$
【14】
\test\smtext2.txt"
forou
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机等级考试二级vb试试题 副本 计算机等级考试 二级 vb 试试