vb题目.docx
- 文档编号:29005731
- 上传时间:2023-07-20
- 格式:DOCX
- 页数:30
- 大小:24.49KB
vb题目.docx
《vb题目.docx》由会员分享,可在线阅读,更多相关《vb题目.docx(30页珍藏版)》请在冰豆网上搜索。
vb题目
VB第二阶段练习分析
-1.单项选择题
1.给出下列程序代码在第一次单击命令按钮时文本框Text1和Text2中的内容,第二次单击命令按钮时文本框Text1和Text2的内容。
DimyAsInteger
PrivateSubCommand1_Click()
DimxAsInteger
x=2
Text1.Text=SecondFunc(FirstFunc(x),y)
Text2.Text=FirstFunc(x)
EndSub
PrivateFunctionFirstFunc(xAsInteger)
x=x+y:
y=x+y
FirstFunc=x+y
EndFunction
PrivateFunctionSecondFunc(xAsInteger,yAsInteger)
SecondFunc=2*x+y
EndFunction
A.10,1020,20
B.20,2030,30
C.50,5010,10
D.10,1058,58
1.得分率0.346534常见答案c人数13
2.程序代码如下,当单击窗体上Command1控件时,窗体上显示的结果是_________。
OptionBase1
PrivateSubCommand1_Click()
DimiAsInteger
Dimx(3,3)AsInteger
Fori=1To3
Forj=1To3
x(i,j)=(i-1)*3+j
Nextj
Nexti
Fori=1To3
Printx(i,4-i)
Nexti
EndSub
A.159
B.147
C.357
D.369
2.得分率0.752475常见答案人数
3.下面关于顺序文件的描述正确的是____________。
A.每条记录的长度必须相同
B.可通过编程对文件中的某条记录方便地修改
C.数据只能以ASCII码形式存放在文件中,所以可通过文本编辑软件显示
D.文件的组织结构复杂
3.得分率0.415841常见答案a人数5
4.如果Forml是启动窗体,并且Forml的Load事件过程中有form2.show,则程序启动后____________。
A.发生一个运行时错误
B.发生一个编译错误
C.在所有的初始化代码运行后Form1是活动窗体
D.在所有的初始化代码运行后Form2是活动窗体
4.得分率0.10891常见答案a人数10
5.下列有关数组的说法中,不正确的是________。
A.在窗体模块中不可以定义全局数组
B.可以使用Erase语句释放所有数组所占据的存储储空间
C.语句DimX(3.6+2)AsInteger定义了一个维上界是6的一维的整型数组
D.形参数组的类型可以是定长符串类型
5.得分率0.10891常见答案b人数11
6.假定已定义了一个过程SubAdd(aAsSingle,bAsSingle),则正确的调用语句是________。
A.Add(12,12)
B.CallAdd(2*x,Sin(1.57))
C.CallAddx,y
D.CallAdd(12,12,x)
6.得分率0.623762常见答案d人数8
7.当运行程序时,系统自动执行启动窗体的事件过程。
A.Load
B.Click
C.UnLoad
D.GotFocus
7.得分率0.762376常见答案人数
8.设有如下说明:
PublicSubFl(n%)
…
n=3*n+4
…
EndSub
PrivateSubCommandl_Click()
Dimn%,m%
n=3
m=4
…
'调用F1语句
EndSub
则在Commandl_C1ick事件中有效的地址传递的调用语句是。
A.F1n+m
B.F1m
C.F15
D.F1m+5
得分率
8.得分率0.356435常见答案c人数10
9.可以在________中,使用语句PublicPubStrAsString*20定义一个定长字符串。
A.窗体模块
B.标准模块
C.类模块
D.三者均可
9.得分率0.287128常见答案c人数4
10.下面的过程定义语句中合法的是_______。
A.SubProcl(ByValn())
B.SubProcl(n)AsInteger
C.FunctionProcl(Procl)
D.FunctionProcl(ByValn)
10.得分率0.415841常见答案c人数6
11.在VisualBasic中文件访问的类型有________。
A.顺序、随机、二进制
B.顺序、随机、字符
C.顺序、十六进制、随机
D.顺序、记录、字符
11.得分率0.782178常见答案人数
12.在用Open语句打开文件时,如果省略了“For方式”,则打开文件的存取方式是____________。
A.顺序输入方式
B.顺序输出方式
C.随机存取方式
D.二进制方式
12.得分率0.50495常见答案d人数8
13.如下二维数组声明语句,____________正确。
A.Dima[3,4]AsInteger
B.Dima(3,4)AsInteger
C.Dima(n,n)AsInteger
D.Dima(34)AsInteger
13.得分率0.920792常见答案人数
14.KILL语句在VB语言中的功能是____________。
A.清内存
B.清病毒
C.删除磁盘上的文件
D.清屏幕
14.得分率0.386138常见答案b人数8
15.若在应用程序中用PrivateSubSub1(Xasinteger,YasSingle)定义了子程序Sub1,调用程序中的变量i、j均为Integer型,则正确调用子程序Sub1的Call语句是。
①CallSub1(i,j)②CallSub1(3.1415,i)
③CallSub1(3.14,234)④CallSub1(“245”,“231.5”)
A.①③
B.③④
C.①②③
D.无
15.得分率0.10891常见答案b人数11
16.Debug语句实现的功能是____________。
A.将指定的字符串在当前窗口输出
B.将指定的字符串在打印机上输出
C.在立即窗口输出指定字符串
D.在图片框上显示指定字符串
16.得分率0.554455常见答案b人数6
17.要想在过程调用后返回两个结果,下面的过程定义语句合法的是________________。
A.SubProcl(ByValn,ByValm)
B.SubProcl(n,ByValm)
C.SubProcl(n,m)
D.SubProcl(ByValn,m)
17.得分率0.386138常见答案b人数5
18.多窗体程序有多个窗体组成。
在缺省情况下,VB在执行程序时,总是把____________指定为启动窗体。
A.不包含任何控件的窗体
B.设计时的第一个窗体
C.命名为Frm1的窗体
D.包含控件最多的窗体
18.得分率0.643564常见答案d人数2
19.以下有关变量作用域的说明中,错误的是。
A.只有在标准模块中用Public语句说明的变量才是全局变量
B.在过程中不能使用Public语句说明全局变量
C.在标准模块的通用声明处可用语句说明模块级变量
D.在窗体的通用声明处可用Private语句说明窗体级变量
19.得分率0.594059常见答案c人数9
20.下列程序段的输出结果是____________。
DimiAsInteger
Dima(8)AsInteger
y=18:
i=0
Do
a(i)=yMod2
i=i+1
y=y\2
LoopUntily<1
Forj=i-1To0Step-1
Printa(j);
Nextj
A.1000
B.10010
C.00110
D.10100
20.得分率0.574257常见答案a人数3
21.下面能够正确打开的一组语句是:
_____。
A.Open“Data1”forOutputAs#1Open“Data2”forInputAs#1
B.Open“Data1”forOutputAs#1Open“Data2”forInputAs#2
C.Open“Data1”forInputAs#1Open“Data1”forInputAs#2
D.Open“Data1”forInputAs#1Open“Data1”forRandomAs#2
21.得分率0.148514常见答案a人数9
22.某过程的说明语句中,正确的数组说明语句是____________。
ConstNasinteger=4
DimLasinteger
①.DimX(L)AsInteger
②.DimA(K)AsInteger
ConstKAsInteger=3
③.DimB(N)AsInteger
④.DimY(2000To2008)AsInteger
A.①②④
B.①③④
C.③④
D.②③
22.得分率0.554455常见答案a人数6
23.使用PublicConst语句声明一个全局的符号常量时,该语句应放在____________。
A.过程中
B.窗体模块的通用声明段
C.标准模块的通用声明段
D.窗体模块或标准模块的通用声明段
23.得分率0.20792常见答案a人数4
24.要从磁盘上新建一个文件名为"c:
\t1.txt"顺序文件,如下____________正确。
A.F="c:
\t1.txt"
OpenFForAppendAs#2
B.F="c:
\t1.txt"
Open"F"ForOutputAs#2
C.Openc:
\t1.txtForOutputAs#2
D.Open"c:
\t1.txt"ForOutputAs#2
24.得分率0.376237常见答案c人数5
25.下列定义Sub过程的语句中,正确的语句是。
①PrivateSubTest(StAsString*8)
②PrivateSubTest(Sarray()AsString*5)
③PrivateSubTest(Sarray()AsString)
④PrivateSubTest(StAsString)
A.①②
B.①④
C.②③④
D.①②③④
25.得分率0.544554常见答案d人数21
26.如果在被调用过程中改变了形参值,只影响副本,而不会影响实参的变量本身,这种参数传递方式称为传递。
A.按值
B.按地址
C.ByRef
D.按形参
26.得分率0.841584常见答案人数
27.在窗体上添加一个命令按钮,名为Command1,事件过程如下。
执行结果是________。
Subpb(b()AsInteger)
Fori=1To4
B(i)=2*i
Nexti
EndSub
PrivateSubCommand1_Click()
Dima(1To4)AsInteger
a
(1)=5:
a
(2)=6:
a(3)=7:
a(4)=8
pba
Fori=1To4
Printa(i);
Nexti
EndSub
A.555
51010
B.555
5510
C.5510
51010
D.555
101010
27.得分率0.277227常见答案d人数13
28.要向已有数据的c:
\test\test.txt文件添加数据,正确的文件打开命令是____________。
A.Open〞c:
\test\test.txt〞ForAppendAs#512
B.Open〞c:
\test\test.txt〞ForAppendAs#511
C.Open〞c:
\test\test.txt〞ForOutputAs#512
D.Open〞c:
\test\test.txt〞ForOutputAs#511
28.得分率0.257425常见答案d人数9
29.以下有关由多个窗体和标准模块组成的应用程序设计方法的叙述中,错误的是________。
A.在缺少情况下,设计时的一个窗体被指定为启动窗体。
B.通过人为设置,可指定任一窗体为启动窗体。
C.通过人为设置,可指定标准模块中的Main()过程为启动过程。
D.通过人为设置,可指定窗体模块中的Main()过程为启动过程。
29.得分率0.415841常见答案b人数10
30.通用过程可以完成一项指定任务,必须由__________调用才行。
A.应用程序
B.系统引发
C.定时器
D.SubMain
30.得分率0.564356常见答案c人数1
31.可以在窗体模块的通用声明段中声明的是________________。
A.全局变量
B.全局常量
C.全局数组
D.全局用户自定义类型
31.得分率0.534653常见答案c人数4
32.如下程序,运行的结果是____________。
PublicFunctionpi!
(x!
n%)
Ifn=0Then
pi=1
ElseIfnMod2=1Then
pi=x*pi(x,n\2)
Else
pi=pi(x,n\2)\x
EndIf
EndFunction
PrivateSubCommand1_Click()
Printpi(3,7)
EndSub
A.18
B.7
C.14
D.27
32.得分率0.564356常见答案b人数7
33.要从自定义对话框Form2中退出,可以在该对话框的“退出”按钮的Click事件过程中使用的语句是。
A.UnloadForm2
B.HideForm2
C.Unload.Form2
D.Form2.Unload
33.得分率0.297029常见答案b人数3
34.当发生Command1_Click事件后,程序输出结果是________。
OptionBase1
PrivateSubCommand1_Click()
Dima(4,4)AsInteger,iAsInteger,sAsInteger
s=0
Fori=1To4
Forj=1To4
a(i,j)=(i-1)*4+j*2
Nextj
Nexti
Fori=1To4
s=s+a(i,i)
Nexti
Prints
EndSub
A.28
B.32
C.30
D.44
34.得分率0.673267常见答案a人数1
35.给出下列程序代码,在单击命令按钮时的输出结果是________。
PrivateSubCommand1_Click()
DimxAsInteger,yAsInteger
x=1:
y=1
Forn=1TO3
z=FirstFunc(x,y)
Printn,z,
Nextn
EndSub
PrivateFunctionFirstFunc(xAsInteger,yAsInteger)AsInteger
DimnAsInteger
DoWhilen<=4
x=x+y
n=n+1
Loop
FirstFunc=x
EndFunction
A.16211316
B.26131116
C.123456
D.213133
35.得分率0.376237常见答案d人数5
36.系统默认的参数传递方式是___________传递。
A.按值
B.按地址
C.ByVal
D.按实参
36.得分率0.722772常见答案人数
37.用户自定义数据类型时,其成员不能是_______。
A.定长字符串
B.变长字符串
C.货币型和日期型
D.数组
37.得分率0.10891常见答案b人数11
38.在窗体上画一个名称Command1的命令按钮和一个名称为Text1的文本框,然后编写如下程序:
PrivateSubCommand1_Click()
Dimx,y,zAsInteger
x=5:
y=7:
z=0
Text1.Text=""
Callp1(x,y,z)
Text1.Text=Str(z)
EndSub
PrivateSubp1(ByValaAsInteger,ByValbAsInteger,cAsInteger)
c=a+b
EndSub
程序运行后,如果单击命令按钮,则在文本框中显示的内容是________。
A.0
B.12
C.Str(z)
D.没有显示
38.得分率0.663366常见答案c人数4
39.要为工程添加一个过程,可执行“”菜单中的“添加过程”.
A.文件
B.视图
C.工程
D.工具
39.得分率0.495049常见答案b人数3
40.以下有关过程的说法中错误的是________。
A.在Sub或Function过程中不能再定义其他Sub或Function过程
B.在调用过程时,与使用ByRef说明的形参对应的实参只能按地址传递方式结合
C.递归过程既可以是递归Function过程,也可以是递归Sub过程
D.在调用过程时,形参为数组的参数对应的实参只能是数组
40.得分率0.227722常见答案d人数21
41.完善以下程序:
在磁盘A的根目录下有一个名为Sco.dat的文件,内容为姓名、英语成绩、物理成绩、数学成绩,现依此文件在根目录下建立一个名为Aver.dat的文件,内容为姓名及三门课的平均成绩。
Open“A:
\sco.dat”ForInputAs#3
Open“A:
\Aver.dat”ForOutputAs#2
DoWhile_____
Input#3,NAS,ENG,PAY,MATH
Write#2,NAS,(ENG+PHY+MATH)/3
Loop
Close#2
Close#3
A.EOF(3)
B.NotEOF(3)
C.EOF
(2)
D.NotEOF
(2)
41.得分率0.415841常见答案d人数12
42.在窗体模块的通用声明处用下面的语句声明变量、数组,正确语句有________个。
①PublicA(5)AsInteger
②PublicNAsInteger
③PublicStAsString
④Privateb()AsInteger
A.2
B.3
C.4
D.1
42.得分率0.435643常见答案d人数7
43.要建立一个学生成绩的随机文件,文件名为"stud.dat",如下程序段______正确。
A.Openstud.datForRandomAs#1
B.Open"stud.dat"ForRandomAs#1
C.Open"stud.dat"ForOutputAs#1
D.Open"stud.dat"ForRandomAs#1
43.得分率0.663366常见答案a人数4
44.运行程序产生死循环时,按________键可以终止程序的运行。
A.Ctrl+C
B.Ctrl+Z
C.Ctrl+Break
D.单击停止运行按钮
44.得分率0.841584常见答案人数
45.窗体上画一个按钮,然后编写如下的事件代码。
在按钮上单击,输出为__________。
PrivateSubfun()
StaticaAsInteger
a=a+2
Printa;
EndSub
PrivateSubCommand1_Click()
DimmAsInteger
Form=1To3
Callfun
Nextm
EndSub
A.222
B.000
C.248
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- vb 题目
![提示](https://static.bdocx.com/images/bang_tan.gif)