VB期末练习题库.docx
- 文档编号:6991377
- 上传时间:2023-01-15
- 格式:DOCX
- 页数:177
- 大小:1.22MB
VB期末练习题库.docx
《VB期末练习题库.docx》由会员分享,可在线阅读,更多相关《VB期末练习题库.docx(177页珍藏版)》请在冰豆网上搜索。
VB期末练习题库
1.参与运算的两个表达式均为True,运算结果也为True,则该逻辑运算符为:
C.AND
2.为了能在列表框中利用Ctrl和Shift键进行多个列表项的选择,则应
将列表框的Multiselect属性设置为().
C.2
3.要使标签能够显示所需要的东西,则在程序中应设置其哪一属性的值().
D.Caption
4.能够获得一个文本框中被选取文本的内容的属性是().
C.SelText
5.任何控件都具有的属性是().
B.NAME
6.为了使列表框中的项目按字母顺序排列,应设置哪个属性?
B.Sorted
7.在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
PrivateSubCommand1_Click()
StaticxAsInteger
Cls
y=y+2
x=x+2
Printx,y
EndSub
程序运行后,连续四次单击Command1按钮后,窗体上显示的是
B.82
8.货币型数据需()字节.
A.8
9.执行以下程序段后,变量c的值为()
a="VisualBasicPrograming":
b="Quick"
c=b&UCase(Mid(a,7,6))&Right(a,11)
D.QuickBASICPrograming
10.要强制显示声明变量,可在窗体模块或标准模块的声明段中加入
语句().
C.OptionExplicit
11.下列对象不具有KeyPress事件的是
D.标签
12.菜单能够响应的事件是
A.Clik
13.在VisualBasic中,松开鼠标键触发的事件是
B.MouseUp
14.将图片框的属性设置成True时,可使图片框根据图片调整大小。
A.AutoSize
15.当Stretch属性值为False时,。
C.影像框的大小随图片大小进行调整
16.在窗体上画出一个命令按钮,然后编写如下程序:
FunctionFunc(mAsInteger,nAsInteger)AsInteger
Func=IIf(m EndFunction PrivateSubCommand1_Click() DimxAsInteger,yAsInteger,zAsInteger x=50 y=40 Printz=Func(x,y) EndSub 程序运行后,单击命令按钮,则输出的结果是. A.False 17.关键字ListBox代表的控件类型是. D.列表框 18.定义一个如下的过程: SubSum(xAsInteger,yAsInteger,zAsInteger) Printx+y+z EndSub 下列调用方式与CallSum(3,4,5)语句不等价的是. A.Sumy: =3,x: =4,z: =5 19.下列可以作过程名的是. D.Sub1 20.定义一个如下的过程: SubSum(xAsInteger,yAsInteger,zAsInteger) Printx+y+z EndSub 下列调用方式与CallSum(3,4,5)语句不等价的是. C.Sumy: =3,x: =4,z: =5 '------------------------------------------------- '【程序设计】 '------------------------------------------------- '题目: 编写函数fun其功能是: 根据整型形参m, '计算如下公式的值: 'y=1/5+1/6+1/7+1/8+1/9+1/10...+1/(m+5) '例如: 若m=9,则应输出: 1.168229 '要求: 函数中用到的中间变量必须声明为Single类型。 '------------------------------------------------- 【参考代码】 DimyAsDouble DimiAsInteger Fori=0Tom y=y+1/(i+5) Next Fun=y =============== 【控件属性评分】错误 【控件】VB.Menu_m1 标准答案: Name=m1 学生答案: Name= 【控件属性评分】错误 【控件】VB.Menu_m1 标准答案: Caption=收藏 学生答案: Caption= 【控件属性评分】错误 【控件】VB.Menu_m2 标准答案: Name=m2 学生答案: Name= 【控件属性评分】错误 【控件】VB.Menu_m2 标准答案: Caption=工具 学生答案: Caption= 【控件属性评分】错误 【控件】VB.Menu_a1 标准答案: Name=a1 学生答案: Name= 【控件属性评分】错误 【控件】VB.Menu_a1 标准答案: Caption=选项 学生答案: Caption= 【控件属性评分】错误 【控件】VB.Menu_a2 标准答案: Name=a2 学生答案: Name= 【控件属性评分】错误 【控件】VB.Menu_a2 标准答案: Caption=设置 学生答案: Caption= 【控件属性评分】错误 【控件】VB.Menu_a2 标准答案: Enabled=0'False 学生答案: Enabled= 【控件属性评分】错误 【控件】VB.Menu_m3 标准答案: Name=m3 学生答案: Name= 【控件属性评分】错误 【控件】VB.Menu_m3 标准答案: Caption=帮助 学生答案: Caption= 【控件属性评分】错误 【控件】VB.OptionButton_Option2 标准答案: Caption=最小值 学生答案: Caption= 【控件属性评分】错误 【控件】VB.OptionButton_Option1 标准答案: Caption=最大值 学生答案: Caption= 【控件属性评分】错误 【控件】VB.HScrollBar_HScroll1 标准答案: Max=100 学生答案: Max= 【控件属性评分】错误 【控件】VB.HScrollBar_HScroll1 标准答案: TabIndex=0 学生答案: TabIndex= 【控件属性评分】错误 【控件】VB.TextBox_Text1 标准答案: Name=Text1 学生答案: Name= 【事件评分】错误 【事件】PrivateSubCommand1_Click() 标准答案: Untiln>2 =0 Factor=Factor+1 学生答案: DimnAsInteger,FactorAsInteger DimFirstAsBoolean Do n=InputBox("请输入一个大于2的整数") Ifn<=2ThenMsgBox("请重新输入") 'Loop? untiln>2 Factor=2 First=True Do 'DoWhilenModFactor? =0 IfFirstThen Text1.Text=Str(n)+Space (1)+"="+Str(Factor) First=False Else Text1.Text=Text1.Text+Space (1)+"*"+Str(Factor) EndIf n=n/Factor Loop '? Factor=Factor+1 LoopUntilFactor>n 【控件属性评分】错误 【控件】VB.CommandButton_Cmd1 标准答案: Caption=产生可变正方形图案 学生答案: Caption=Cmd1 【控件属性评分】错误 【控件】VB.CommandButton_Cmd1 标准答案: Left=300 学生答案: Left=120 【事件评分】错误 【事件】PrivateSubCmd1_Click() 标准答案: k a(i,j); Print 学生答案: Dima() n=InputBox("请输入控制正方形图案层数的可变数") ReDima(n,n) Fork=1To(n+1)\2 Fori=kTon-k+1 'Forj=? kTon-k+1 'a(i,j)=? k Nextj Nexti Nextk Fori=1Ton Forj=1Ton 'PrintTab(j*3);? a(i,j) Nextj '? Printi Next 1.除了系统默认的工具箱布局外,在VisualBasic中还可以通过()方法来定义选项卡组织安排控件。 A.在工具箱单击鼠标右键,执行快捷菜单中的"添加选项卡"命令 2.()属性决定了按Tab键时焦点在各个控件之间移动的顺序。 C.Tablndex 3.简单组合框的style值为()。 B.1 4.下面4项中合法的变量名是()。 A.X_yz 5.在下面关于窗体的叙述中,错误的是()。 D.每当窗体需要重画时,肯定会触发Paint事件 6.组合框有三种风格,它们由Style属性所决定,其中为下拉列表框时,Style属性值应为()。 C.2 7.要分配存放如下方阵的数据: 1.12.23.3 4.45.56.6 7.78.89.9 数组声明语句能实现(不能浪费空间)的是 A.Dima(-1To1,-5To-3)AsSingle 8.设a=6,则执行x=IIf(a>5,-1,0)后,x的值为()。 D.-1 9.下面关于顺序文件的描述正确的是()。 D.记录按进入的先后顺序存放,读出也是按原写入的先后顺序读 10.不能正确表示条件"两个整型变量A和B之一为0,但不能同时为0"的布尔表达式()。 D.A*B=0AND(A=0ORB=0) 11.输入对话框(InputBox)的返回值的类型是。 C.字符串 12.将CommonDialog通用对话框以“打开文件对话框”方式打开,可选方法。 B.ShowOpen 13.在窗体上画一个名称为Text1的文本框,然后编写如下事件过程: PrivateSubText1_KeyPress(KeyAsciiAsInteger) DimcharAsString KeyAscii=KeyAscii+1 char=Chr(KeyAscii) KeyAscii=Asc(UCase(char)) Text1.Text=String(4,KeyAscii) EndSub 程序运行后,在文本框中输入字母“b”,则文本框显示的内容是 C.CCCCC 14.BorderStyle属性是用来表示线条的。 B.线形 15.RGB函数中的3个数字分别表示。 B.红、绿、蓝 16.有一如下过程: Subfact(nAsInteger,resultAsLong) result=1 Fori=1Ton result=result*i Nexti EndSub 在窗体上画一个名称为Command1的命令按钮,并编写如下事件过程: PrivateSubCommand1_Click() DimresAsLong fact5,res Printres EndSub 程序运行后,单击命令按钮,则输出的结果是. A.120 17.有如下程序: SubMySub(ParamArraya()) s=1 ForEachxIna s=s+x Nextx Prints EndSub PrivateSubCommand1_Click() MySub2,3,6,18 EndSub 程序运行后,单击命令按钮,则输出的结果是. A.30 18.定义一个如下的过程: SubSum(xAsInteger,yAsInteger,zAsInteger) Printx+y+z EndSub 下列调用方式与CallSum(3,4,5)语句不等价的是. A.Sumy: =3,x: =4,z: =5 19.执行语句“Write#1,234;-34.56,"hello";Date”后,相应文件内被写入。 D.234,-34.56,"hello",#2001-08-03# 20.VisualBasic的过程有三种,它们是. B.事件过程、函数过程和子程序过程 '------------------------------------------------- '【程序设计】 '------------------------------------------------- '题目: 编写函数fun其功能是: 根据整型形参m,计算 '如下公式的值: y=1/2+1/4+1/6+...+1/2m '例如: 若m=9,则应输出: 1.41448412698413 '------------------------------------------------- 【参考代码】 DimyAsDouble DimiAsInteger Fori=1Tom y=y+1/(2*i) Next fun=y =============== 【控件属性评分】错误 【控件】VB.Label_Label1 标准答案: Name=Label1 学生答案: Name= 【控件属性评分】错误 【控件】VB.Label_Label1 标准答案: BorderStyle=1'FixedSingle 学生答案: BorderStyle= 【控件属性评分】错误 【控件】VB.Label_Label1 标准答案: Caption=VB程序 学生答案: Caption= 【控件属性评分】错误 【控件】VB.Label_Label1 标准答案: Caption=程序设计 学生答案: Caption= 【控件属性评分】错误 【控件】VB.Label_Label1 标准答案: Caption=等级考试 学生答案: Caption= 【控件属性评分】错误 【控件】VB.Label_Label1 标准答案: Name=Label1 学生答案: Name= 【窗体属性评分】正确 【窗体】sjt2.frm 标准答案: Name=Form1 学生答案: Name=Form1 【窗体属性评分】错误 【窗体】sjt2.frm 标准答案: Caption=显示鼠标的横坐标 学生答案: Caption=Form1 【事件评分】错误 【事件】PrivateSubForm_MouseMove(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle) 标准答案: Label1.Caption=X 学生答案: 【事件评分】错误 【事件】PrivateSubAdd_Click() 标准答案: Text1.Text 学生答案: 【事件评分】错误 【事件】PrivateSubDelete_Click() 标准答案: List1.ListCount-1 Text1.Text i 学生答案: 【控件属性评分】错误 【控件】VB.ListBox_List1 标准答案: Name=List1 学生答案: Name= 【控件属性评分】错误 【控件】VB.TextBox_Text1 标准答案: Name=Text1 学生答案: Name= 【控件属性评分】错误 【控件】VB.Menu_Item 标准答案: Name=Item 学生答案: Name= 【控件属性评分】错误 【控件】VB.Menu_Item 标准答案: Caption=项目 学生答案: Caption= 【控件属性评分】错误 【控件】VB.Menu_Add 标准答案: Name=Add 学生答案: Name= 【控件属性评分】错误 【控件】VB.Menu_Add 标准答案: Caption=添加项目 学生答案: Caption= 【控件属性评分】错误 【控件】VB.Menu_Delete 标准答案: Name=Delete 学生答案: Name= 【控件属性评分】错误 【控件】VB.Menu_Delete 标准答案: Caption=删除项目 学生答案: Caption= 下列不能打开属性窗口的操作是().D.按Ctrl+T 设有如下程序: PrivateSubCommand1_Click() DimsumAsDouble,xAsDouble sum=0 n=0 Fori=1To5 x=n/i n=n+1 sum=sum+x Next EndSub 该程序通过For循环计算一个表达式的值,这个表达式是 B.1/2+2/3+3/4+4/5 下面4项中不属于面向对象系统三要素的是().A.变量 在下列说法中,正确的是D.框架也有Click和DblClick事件 以下程序输出的结果是: PrivateSubForm_Activate() Dima a=Array(1,2,3,4,5) Fori=Lbound(((A)ToUbound(((A) A(i)=i*a(i) Nexti Printi,Lbound(((A),Ubound(((A),a(i) EndSub A.程序出错 每个窗体对应一个窗体文件,窗体文件的扩展名是().A..frm VB的过程有三种,它们是().C.事件过程、子过程和函数过程 指令"Circle(1000,1000),500,8,-6,-3"将绘制B.扇形 标签的()属性设置为True时,标签控件的大小随标题文字自动调整.C.AutoSize VB提供了结构化程序设计的3种基本结构,这3种基本结构是A.选择结构,循环结构,顺序结构 将CommonDialog通用对话框以“打开文件对话框”方式打开,可选方法。 B.ShowOpen 用户可以通过设置菜单项的属性值为False来使该菜单项失效。 D.Enabled 要动态显示鼠标光标的当前位置,最好用来实现这种功能的鼠标事件是A.MouseMove RGB函数中的3个数字分别表示。 B.红、绿、蓝 对象的边框类型由属性设置。 A.BorderStyle 如果在定义Sub过程时没有使用Private、Public和Static关键字,则所定义的过程是. B.公有的 下列函数不能实现一个自然数N的阶乘的是. A. 定义一个如下的过程: SubSum(xAsInteger,yAsInteger,zAsInteger) Printx+y+z EndSub 下列调用方式与CallSum(3,4,5)语句不等价的是. A.Sumy: =3,x: =4,z: =5 下列方法或函数可以调用外部的可执行文件。 A.Shell 执行语句“Print#1,234;-34.56,"hello";Date”后,相应的文件内被写入。 C.234-34.56hello01-08-03 '------------------------------------------------- '【程序设计】 '------------------------------------------------- '题目: (事件)单击窗体。 '(响应)已知sum=1-1/4+1/9-1/16+1/25...-1/100, '请将sum结果值输出到窗体上。 '使用for...next语句完成程序 '------------------------------------------------- 【参考代码】 DimiAsInteger fori=1to10 sum=sum+(-1)^(i-1)/(i*i) next Printsum =============== 【控件属性评分】错误 【控件】VB.Label_Label1 标准答案: Name=Label1 学生答案: Name= 【控件属性评分】错误 【控件】VB.Label_Label1 标准答案: BorderStyle=1'FixedSingle 学生答案: BorderStyle= 【控件属性评分】错误 【控件】VB.Label_Label1 标准答案: Caption=VB程序 学生答案: Caption= 【控件属性评分】错误 【控件】VB.Label_Label1 标准答案: Caption=程序设计 学生答案: Caption= 【控件属性评分】错误 【控件】VB.Label_Label1 标准答案: Caption=等级考试 学生答案: Caption= 【控件属性评分】错误 【控件】VB.Label_Label1 标准答案: Name=Label1 学生答案: Name= 【窗体属性评分】正确 【窗体】sjt2.frm 标准答案: Name=Form1 学生答案: Name=Form1 【窗体属性评分】错误 【窗体】sjt2.frm 标准答案: Caption=显示鼠标的横坐标 学生答案: Caption=Form1 【事件评分】错误 【事件】PrivateSubForm_MouseMove(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle) 标准答案: Label1.Caption=X 学生答案: 【控件属性评分】错误 【控件】VB.OptionButton_Option1 标准答案: Name=Option1 学生答案: Name= 【控件属性评分】错误 【控件】VB.OptionButton_Option1 标准答案: Caption=添加项目 学生答案: Caption= 【控件属性评分】错误 【控件】VB.OptionButton_Option2 标准答案: Name=Option2 学生答案: Name= 【控件属性评分
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VB 期末 练习 题库