计算机vb考试题库.docx
- 文档编号:24732052
- 上传时间:2023-06-01
- 格式:DOCX
- 页数:18
- 大小:19.34KB
计算机vb考试题库.docx
《计算机vb考试题库.docx》由会员分享,可在线阅读,更多相关《计算机vb考试题库.docx(18页珍藏版)》请在冰豆网上搜索。
计算机vb考试题库
计算机vb考试题库
一、选择题
1、任何控件都有的属性是()。
A.BackColor
B.Caption
C.Name
D.BorderStyle
2、设计数据库的存储结构属于( )
A.需求分析
B.概念设计
C.逻辑设计
D.物理设计
3、某人创建了1个工程,其中的窗体名称为Form1;之后又添加了1个名为Form2的窗体,并希望程序执行时先显示Form2窗体,那么,他需要做的工作是( )。
A.在工程属性对话框中把"启动对象"设置为Form2
B.在Forml的Load事件过程中加入语句LoadForm2
C.在Form2的Load事件过程中加入语句Form2.Show
D.把Form2的TabIndex属性设置为l,把Form1的TabIndex属性设置为2
4、设有如下通用过程:
PublicFunctionFun(xStrAsString)AsString
DimtStrAsString,strLAsInteger
tStF=""
strL=Len(xStr)
i=1DoWhilei<=strL/2
tStr=Tstr&Mid(xStr,i,1)&Mid(xStr,strL-i+1,1)
i=i+l
Loop
Fun=tStr
EndFunction
在窗体上画一个名称为Command1的命令按钮。
然后编写如下的事件过程:
PrivateSubCommandI_Click()
DimS1AsString
S1="abedef"
PrimUCase(Fun(S1))
EndSub
程序运行后,单击命令按钮,输出结果是( )。
A.ABCDEF
B.abcdef
C.AFBECD
D.DEFABC
5、下列关于栈的描述正确的是( )。
A.在栈中只能插入元素而不能删除元素
B.在栈中只能删除元素而不能插入元素
C.栈是特殊的线性表,只能在一端插入或删除元素
D.栈是特殊的线性表,只能在一端插入元素,而在另一端删除元素
6、下列程序段的运行结果是( )。
Subsele( )
DimnAsInteger
i=21:
n=3
DoWhilei>n
i=i-n
Loop
Printi
EndSub
A.2
B.4
C.5
D.3
7、复选框的Value属性为0时,表示该复选框( )。
A.未被选中
B.被选中
C.框内有灰色的勾
D.操作有误
8、在窗体上有一个名称为Check1的复选框数组(含4个复选框),还有一个名称为Text1的文本框,初始内容为空。
程序运行时,单击任何复选框,则把所有选中的复选框后面的方字罗列在文本框中(见图)。
下面能实现此功能的事件过程是( )。
A.PrivateSubCheck1_Click(IndexAsInteger)
Text1.Text=""
Fork=0To3
IfCheck1(k).value=1Then
Text1.Text=Text1.Text&Check1(k).Caption&""双引号中是空格EndIfNextk
EndSub
B.PrivateSubCheck1_Click(IndexAsInteger)
Fork=0To3
IfCheck1(k).Value=1Then
Text1.Text=Text1.Text&Check1(k).Caption&""双引号中是空格
EndIf
Nextk
EndSub
C.PrivateSubCheck1_Click(IndexAsInteger)
Text1.Text=""Fork=0To3IfCheck1(k).Value=1Then
Text1.Text=Text1.Text&Check1(Index).Caption&""双引号中是空格
EndIf
Nextk
EndSub
D.PrivateSubCheck1_Click(IndexAsInteger)
Text1.Text=""Fork=0To3
IfCheck1(k).Value=1Then
Text1.Text=Text1.Text&Check1(k).Caption&""双引号中是空格
ExitFor
EndIf
Nextk
EndSub
9、在窗体上添加一个命令按钮,名为Command1,其单击事件中有下列程序段,则事件过程执行后,文本框中输出
( )。
Fori=1To4
Forj=1To3
x=3
Fork=1To2
x=x+3
Nextk
Nextj
Nexti
Textl.Text=Str(x)
A.3
B.6
C.9
D.12
10、下列关于Sub过程的叙述正确的是( )。
A.一个Sub过程必须有一个ExitSub语句
B.一个Sub过程必须有一个EndSub语句
C.在Sub过程中可以定义一个Function过程
D.可以用Goto语句退出Sub过程
11、下列叙述中正确的是()。
A.在窗体的Form_Load事件过程中定义的变量是全局变量
B.局部变量的作用域可以超出所定义的过程
C.在某个Sub过程中定义的局部变量可以与其他事件过程中定义的局部变量同名,但其作用域只限于该过程
D.在调用过程时,所有局部变量被系统初始化为0或空字符串
12、编写如下两个事件过程:
PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)
PrintChr(KeyCode)
EndSub
PrivateSubForm_KeyPress(KeyAsciiAsInteger)
PrintChr(KeyAscii)
EndSub
在一般情况下(即不按住Shift键也未锁定大写键时)运行程序,如果按键盘上的"A"键,则程序输出的结果是( )。
A.A
a
B.a
A
C.A
A
D.a
a
13、在窗体上画一个命令按钮,名称为Command1,然后编写下列代码:
OptionBase0
PrivateSubCommand1_Click()
DimA1(4)AsInteger,A2(4)AsInteger
Fork=0To2
A1(k+1)=InputBox("请输入一个整数")
A2(3-k)=A1(k+1)
NextkPrintA2(k)
EndSub
程序运行后,单击命令按钮,在输入对话框中依次输入2、4、6,则输出结果为( )。
A.0
B.1
C.2
D.3
14、下面语句正确的是( )。
A.Ifx<3*yand=""x="">yTheny=x^3
B.Ifx<3*yand=""x="">yTheny=3x
C.Ifx<3*yx="">yTheny=x^3
D.Ifx<3*yand=""x="">yTheny=x**3
15、下面程序的输出结果是( )。
PrivateSubCommand1_Click()
Ch$="ABCDEF"
procch:
Printch
EndSub
PrivateSubproc(chAsString)
s=""
Fork=Len(ch)To1Step-1
s=s&Mid(ch,k,1)
Nextk
ch=s
EndSub
A.ABCDEF
B.FEDCBA
C.A
D.F
16、语句Dima(-3To4,3To6)AsInteger定义的数组元素个数是( )。
A.18
B.28
C.21
D.32
17、以下叙述中错误的是( )。
A.一个工程中只能有一个SubMain过程
B.窗体的Show方法的作用是将指定的窗体装入内存并显示该窗体
C.窗体的Hide方法和Unload方法的作用完全相同
D.若工程文件中有多个窗体,可以根据需要指定一个窗体为启动窗体
18、在窗体上先后画2个图片框,名称分别为Picture1和banana,banana中添加了香蕉图片,如图1所示,且将banana.DragMode属性设置为1。
要求程序运行时,可以用鼠标把banana拖拽到Picture1中,如图2所示。
能实现此功能的事件过程是( )。
A.PrivateSubForm_DragDrop(SourceAsControl,XAsSingle,YAsSingle)
banana.MovePicture1.Left+X,Picture1.Top+Y
EndSub
B.PrivateSubbanana_DragDrop(SourceAsControl,XAsSingle,YAsSingle)
Source.MovePicture1.Left+X,Picture1.Top+Y
EndSub
C.PrivateSubPicture1_DragDrop(SourceAsControl,XAsSingle,YAsSingle)
Source.MovePicture1.Left+X,Picture1.Top+Y
EndSub
D.PrivateSubPicture1_DragDrop(SourceAsControl,XAsSingle,YAsSingle)
banana.Movebanana.Left+X,banana.Top+Y
EndSub
19、用Print方法在Forml窗体中显示出4个#号的正确代码为( )。
A.Debug.Print"####"
B.Print"####"
C.Forml-Print"####"
D.Forml.Print"####"
20、一个模块内部各个元素彼此结合的紧密程度的度量称为( )
A.耦合性
B.内聚性
C.复杂性
D.数据传输特性
21、函数值和余弦函数值,角度为1,2,3,…,90。
请在空白处填入适当的内容,将程序补充完整。
PrivateTypeAng
KAsInteger
SinxAsSingle
CosxAsSingle
EndType
PrivateSubForm_Click()
DimYAsSingle
DimiAsInteger
DimKscAsAng
Open____________
Y=3.14159/180
Fori=1To90
Ksc.K=i
Ksc.Sinx=Sin(i*Y)
Ksc.Cosx=Cos(i+Y)
________
Nexti
Close#2
ElldStub
A."..Datal.txt"ForRandomAs#1Len=10Put#1,i,Ksc
B."..Datal.txt"ForRandomAs#1Len=10Put#1,Y,Ksc
C."..Datal.txt"ForRandomAs#1Put#1,i,Ksc
D."..Datal.txt"ForRandomAs#1Put#1,Y,Ksc
22、下列程序运行时输出的结果是( )。
OptionBase1
Consta=10
PrivateSubForm_Click0
Dimx(a)AsInteger
k=-1
Fori=1Toa
x(i)=i*k
k=(-1)*k
Nexti
Fori=1To10
Printx(i)
Nexti
EndSub
A.1357910
B.-1-3-5-7-9
C.-12-34-56-78-910
D.1-23-45-67-89-10
23、某人为计算n!
(O
PrivateFunctionfun(nAsInteger)AsLong
DimPAsLong
P=l
Fork=n-1To2Step-1
p=p*k
Nextk
fun=p
EndFunction
在调试时发现该函数过程产生的结果是错误的,程序需要修改。
下面的修改方案中有3种是正确的,错误的方案是( )。
A.把p=1改为p=11
B.把Fork=n-1To2Step-1改为Fork=1Ton-1
C.把Fork=n-1To2Step-1改为Fork=1Ton
D.把Fork--n-1To2Step-1改为Fork=2Ton
24、要设置窗体为固定对话框,并包含控制菜单栏和标题栏,但没有最大化和最小化按钮,设置的操作是( )。
A.设置BorderStyle的值为FixedToolWindow
B.设置BorderStyle的值为SizableToolWindow
C.设置BorderStyle的值为FixedDialog
D.设置BorderStyle的值为Sizable
25、设在窗体上有一个文本框,然后编写如下的事件过程:
PrivateSubText1_KeyDown(KeyCodeAsInteger,ShiftAsInteger)
ConstAlt=4
ConstKey_F2=&H71
altdown%=(ShiftAndAlt)>0
f2down%=(KeyCode=Key_F2)
Ifaltdown%Andf2down%Then
Text1.Text="abl"
EndIf
EndSub
程序运行后,清除文本框中原有内容,如果按Shift+F2键,则在文本框中显示的是()。
A.Alt+F2
B.abl
C.随机出几个数
D.不发生变化
26、在窗体上画两个文本框(名称分别为Text1和Text2)和一个命令按钮(名称为Command1),然后编写下列事件过程:
PrivateSubCommand1_Click()
x=0
DOWhilex<50
x=(x+2)*(x+3)
n=n+l
Loop
Text1.Text=Str(n)
Text2.Text=Str(x)
EndSub
程序运行后,单击命令按钮,在两个文本框中显示的值分别为( )。
A.1和0
B.2和72
C.3和50
D.4和168
27、下列叙述中错误的是( )。
A.软件测试的目的是发现错误并改正错误
B.对被调试的程序进行"错误定位"是程序调试的必要步骤
C.程序调试通常也称为Debug
D.软件测试应严格执行测试计划,排除测试的随意性
28、一个工程必须包含的文件的类型是()。
A.*.vbp*.frm*.frx
B.*.vbp*.cls*.bas
C.*.bas*.ocx*.res
D.*.frm*.cls*.bas
29、在文本框中输入字符时,通过()事件过程可以得到字符的ASCII码值。
A.Change
B.GotFocus
C.KeyPress
D.LostFocus
30、在下列关系运算中,不改变关系表中的属性个数但能减少元组个数的是( )。
A.并
B.交
C.投影
D.笛卡儿乘积
31、有两个关系R,S如下:
由关系R通过运算得到关系S,则所使用的运算为( )。
A.选择
B.投影
C.插入
D.连接
32、一个栈的初始状态为空。
现将元素1、2、3、4、5、A、B、C、D、E依次入栈,然后再一次出栈,则元素出栈的顺序是( )。
A.12345ABCDE
B.EDCBA54321
C.ABCDEl2345
D.54321EDCBA
33、在窗体上建立通用对话框需要添加的控件是( )。
A.Data控件
B.Form控件
C.CommonDialog控件
D.VBComboBox控件
34、在窗体上画2个命令按钮,名称分别为Command1、Command2,然后编写下列事件过程。
Constn=5,m=4
Dima(m,n)
PrivateSubCommand1_Click()
k=1
Fori=1Tom
Forj=1Ton
a(i,j)=k
k=k+1
Nextj
Nexti
EndSub
PrivateSubCommand2_Click()
summ=0
Fori=1Tom
Forj=1Ton
Ifi=1Ori=mThen
summ=summ+a(i,j)
Else
Ifj=1Orj=nThen
summ=summ+a(i,j)
EndIf
EndIf
Nextj
Nexti
Printsumm
EndSub
过程Command1_Click()的作用是在二维数组a中存放1个m行n列的`矩阵;过程Command2_Click()的作用是( )。
A.计算矩阵外围一圈元素的累加和
B.计算矩阵除外围一圈以外的所有元素的累加和
C.计算矩阵第1列和最后一列元素的累加和
D.计算矩阵第1行和最后一行元素的累加和
35、下列关于复选框的说法,正确的是( )。
A.复选框的Enabled属性用于决定该复选框是否可见
B.复选框的Value属性用于决定该复选框是否被选中
C.复选框的Tabindex属性用于决定该复选框在控件数组中的序号
D.复选框的Visible属性用于决定该复选框是否可用
36、按照"后进先出"原则组织数据的数据结构是( )。
A.队列
B.栈
C.双向链表
D.二叉树
37、当一个复选框被选中时,它的Value属性的值是()。
A.3
B.2
C.1
D.0
38、已知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。
现需要计算每个学生的总分,某人编写程序如下:
OptionBase1
PrivateSubCommand1_Click( )
DimsumAsInteger
Sum=0
Fori=1To4
Forj=1To3
Sum=sum+score(i,j)
Nextj
Print"第"&i&"个学生的总分是:
";sumNexti
EndSub
运行此程序时发现,除第1个人的总分计算正确外,其他人的总分是错误的。
程序需要修改。
以下修改方案中正确的是( )。
A.把外层循环语句Fori=1TO4改为Fori=1To3内层循环语句Forj=1TO3改为Forj=1TO4
B.把sum=0移到Fori=1TO4和Forj=1TO3之间
C.把sum=sum+score(i,j)改为sum=sum+score(j,i)
D.把sum=sum+score(i,j)改为sum=score(i,j)
39、设有数组定义语句:
Dima(5)AsInteger,List1为列表框控件。
下列给数组元素赋值的语句错误的是( )。
A.a(3)=3
B.a(3)=InputBox("inputdata")
C.a(3)=List1.ListIndex
D.a=Array(1,2,3,4,5,6)
40、下列()标识符不能作为VisualBasic的变量名。
A.ABCabe
B.b1234
C.28wed
D.crud
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 vb 考试 题库