VB题库.docx
- 文档编号:18008710
- 上传时间:2023-04-24
- 格式:DOCX
- 页数:13
- 大小:23.32KB
VB题库.docx
《VB题库.docx》由会员分享,可在线阅读,更多相关《VB题库.docx(13页珍藏版)》请在冰豆网上搜索。
VB题库
1.结构化程序设计中的三种基本结构不包括(C)。
A顺序结构
B选择结构
C嵌套结构
D循环结构
2.窗体模块文件的扩展名是(B)。
A.clsB.frmC.basD.rec
3.在设计阶段,双击窗体上的某个控件,可以打开(A)。
A代码窗口B属性窗口C工具箱窗口D工程资源管理器窗口
4.下列叙述中,错误的是(C)。
AVB是可视化程序设计语言BVB采用事件驱动编程机制
CVB是面向过程的程序设计语言DVB应用程序可以以编译方式执行
5.在VB中可以通过(C)方法向工具箱加入其它控件。
A右击工具箱,执行弹出式菜单中的“添加选项卡”命令
B执行“文件”菜单中的“添加工程”命令
C执行“工程”菜单中的“部件”命令
D执行“工程”菜单中的“添加窗体”命令
6.下列(A)是合法的变量名。
Ax_yBx-yC2xDand
7.表达式4+6\5*7/9Mod3的值是(B)。
A4B5C6D7
8.下列逻辑表达式为True的是(C)。
A"A"<"9"B"A">"a"C"a">"AT"D"AT"<"AND"
9.表示x大于0且小于10的VB表达式是(B)。
A0
x<10
10.判断整型变量x是奇数的表达式是(A)。
AxMod2<>0BxMod2!
=0CxMod2≠0DxMod2=0
11.下列赋值语句中,正确的是(C)。
Ai+j=10B2i=jCj=i+jDi=j=0
12.表达式Len("幸运52")的值是(B)。
A0B4C6D8
13.以下(B)语句可表示[50,100]之间的随机数。
AInt(Rnd*51)+49BInt(Rnd*51+50)CInt(Rnd*50)+5DInt(Rnd*50+50)
14.表达式Fix(5.6)+Int(-5.6)的值是(B)。
A0B-1 C1D以上都不对
15.设a="39级台阶",使b="台阶"的语句是(D)。
ARight(a,4)BInstr(a,5,4)CLeft(a,5,4)Dmid(a,4,2)
16.执行x=InputBox("请输入半径",0,"求面积"),在输入框中输入3后回车,则下列叙述正确的是(B)。
Ax的值是数值3Bx的值是字符"3"
C0是默认值D对话框标题是"求面积"
17.窗体上有一个命令按钮Command1,编写如下事件过程:
PrivateSubCommand1_Click()
x=InputBox("x=")
y=InputBox("y=")
Printx+y
EndSub
运行后,单击命令按钮,先后在两个输入对话框中输入123和321,窗体显示的内容是(B)。
A444B123321C123+321D出错信息
18.下列叙述中,正确的是(B)。
A窗体的Name属性可以为空B窗体的Name属性定义窗体的名称
C可以在运行期间改变窗体的Name属性D窗体的Name属性的值显示在窗体标题栏中
19.设置窗体的(A)属性可改变窗体标题。
ACaptionBNameCBackColorDBorderStyle
20.使用(C)方法可隐藏窗体,但不从内存中释放。
AShowBLoadCHideDUnLoad
21.设置标签Label1的(D)属性使它不可见。
ALabel1.Visible=0BLabel1.Visible==1
CLabel1.Visible=TrueDLabel1.Visible=False
22.文本框没有(D)属性。
AName BLeftCFontDCaption
23.设置图像框的(C)可使框内的图片按图像框大小自动调整。
AAutoSize属性为TrueBAutoSize属性为False
CStretch属性为TrueDStretch属性为False
24.将当前目录下的图形文件Clock.jpg装入图片框Picture1的语句是(D)。
APicture="Clock1.jpg"BPicture=LoadPicture("Clock1.jpg")
CPicture1.Picture="Clock1.jpg"DPicture1.picture=LoadPicture("Clock1.jpg")
25.在窗体运行时,复选框处于选中但不激活状态,表示(B)。
AEnabled为False且Value为0BEnabled为False且Value为1
CEnabled为True且Value为0DEnabled为True且Value为1
26.属性窗口为命令按钮的Picture属性装入了图片,但却没有显示的原因是(B)。
A按钮的Enabled属性为FalseB按钮的Sytle属性为0
C按钮的Default属性为FalseD按钮的DisabledPicture属性没有装入图片
27.设置命令按钮的(A)属性为True,可使按下Esc键时执行该按钮的单击事件过程。
ACancelBEnabledCValueDDefault
28.引用列表框List1最后一项数据应使用(B)。
AList1.List(ListCount-1)BList1.List(List1.ListCount-1)
CList1.List(ListCount)DList1.List(List1.ListCount)
29.下列(C)控件结合了文本框和列表框的特性。
A图片框B图像框C组合框D标签
30.计时器控件以一定时间间隔触发(D)事件。
AEnabledBIntervalCTimer1DTimer
31.拖动滚动条中的滑块将触发滚动条的(B)事件。
ASlide BScrollCDragOver DDragDrop
32.用(A)分隔同一窗体中的多组单选按钮,使它们互不干扰。
A框架B组合框C复选框D列表框
33.计时器控件能正常工作应具备的两个条件是(C)。
AEnabled属性为True和Interval属性为0BEnabled属性为False和Interval属性为0
CEnabled属性为True和Interval属性非0DEnabled属性为False和Interval属性非0
34.下列程序段的执行结果是(B)。
x=3:
y=5:
z=9
x=x+y
y=x-y
Ifx-y>z-xThenz=x+y
Ifx+y>z-yThenx=z+y
Printx,y,z
A359B14311C8311D859
35.窗体上有一个命令按钮Command1,编写如下事件过程:
PrivateSubCommand1_Click()
Sum=0
Form=1To3
SelectCasem
Case1
a=1
Case2
a=2
Case3
a=3
EndSelect
Printa,
Sum=Sum+a
Nextm
PrintSum
EndSub
运行时,单击按钮,输出结果是(D)。
A3339B3216C1113D1236
36.窗体上有一个命令按钮Command1,编写如下事件过程:
PrivateSubCommand1_Click()
a=80:
b=50:
c=30
Ifa
Ifb=cAnda Ifa=bAndb>cThenc=a+b Printa,b,c EndSub 运行时,单击按钮,窗体输出的结果是(B)。 A805030B803030C503080D503030 37.执行下列程序段后,x的值是(C)。 n=5: x=1: i=1 Do x=x*i i=i+1 LoopWhilei A10B15C24D120 38.执行下列语句后,x的值是(A)。 a=3 x=IIf(a>5,int(-5.6),Fix(5.6)) A5B-5C6D-6 39.窗体上有一个命令按钮Command1,编写如下事件过程: PrivateSubCommand1_Click() a=Val(InputBox("请输入分数: ","计算你的等级",60)) Ifa<0Ora>100Then Print"输入错误" ElseIfa<60Then Print"不合格" ElseIfa<80Then Print"合格" Else Print"优秀" EndIf EndSub 运行时,单击按钮,在输入对话框中直接回车,输出结果为(C)。 A输入错误B不合格C合格D优秀 40.阅读下列程序段: m=0 Fori=1To3 Forj=1Toi m=m+j Nextj,i 执行以上的循环后,i和m的值分别为(D)。 A36B310C46D410 41.所有对象都具有Name(名称)属性 A对B错 42.控件的属性值不可以在程序运行时动态的修改. A对B错 43.决定对象是否可见的属性是Visible属性,决定对象可用性的属性是Enabled属性。 A对B错 44.Do/LoopWhile结构中的循环体,至少被执行一次。 A对B错 45.命令按钮的Enabled属性确定它是否响应任何事件。 A对B错 46.标签控件和文本框控件都用来输入和输出文本。 A对B错 47.当用户拖动滚动条控件中的滚动框时,Scroll和Change事件连续发生。 A对B错 48.VB是以结构化的Basic语言为基础,以事件驱动作为运行机制的可视化程序设计语言。 A对B错 49.由于定时器控件在运行时是不可见的,因此在设置时可将其放在窗体的任何位置。 A对B错 50.许多属性可以直接在属性表上设置,修改,并立即在屏幕上看到效果。 A对B错 程序填空1: 以下程序段用于交换两个整形变量a,b的值。 Dimtmpasinteger Tmp=51 a=52 53 51. Aa Bb Ctmp Da+b 52. Aa Bb Ctmp Da+b 53. Aa=tmp Bb=tmp Ctmp=a Dtmp=b 程序填空2: 以下程序段用于交换一个两位正整数的93个位与十位,以形成一个新的两位正整数39。 Dimaasinteger Dimbasstring Dimcasstring a=93 b=54 b=55 c=56 a=val(c) printa 54. Aval(a) Bint(a) Cstr(a) Dsgn(a) 55. ATrim(b) Blen(b) CTrim(a) Dlen(a) 56. Alen(a) Bright(b,1) Cleft(b,1) Dright(b,1)+left(b,1) 程序填空3: 在窗体中利用一个Label控件和Timer控件实现一个倒计时程序。 每一秒倒计时一次,直到0结束。 效果如图所示。 在Timer控件的Timer事件中,有如下的实现代码。 Dimsecondasinteger Second=val(57) Second=58 If(59) 60 Endif Label1.caption=str(second) 57. Alabel1.text Blabel1.caption Clabel1.Name Dlabel1.forecolor 58. Asecond-1 Bsecond+1 Clabel1+1 Dlabel1-1 59. Asecond>0 Bsecond<=0 Clabel1>0 Dlabel1<=0 60. Asecond>0 Bsecond=0 Csecond<0 Dsecond<=0 综合题1: 设计程序实现如下功能: 实现100以内的正偶数的累加。 请选择正确的语句组填入下划线中。 Dimsumasinteger Dimiasinteger Fori=0to100 61 Next Printsum 61. A Ifimod2=0then Sum=sum+i Endif B Ifi/2=0then Sum=sum+i Endif C Ifi\2=0then Sum=sum+i Endif D Ifimod2=0then Sum=i Endif 综合题2: 以下程序代码实现了从四个整数中选出最大的数。 请选择正确的语句组填入下划线中。 Dimaasinteger Dimbasinteger Dimcasinteger Dimdasinteger Dimeasinteger Dimfasinteger Dimmaxasinteger 62 max=e if(max max=f endif printmax 62. A e=iif(a>b,a,b) f=iif(c>d,c,d) B e=iif(a>b,c,d) f=iif(c>d,a,b) C e=iif(a f=iif(c D e=iif(a f=iif(c
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VB 题库
![提示](https://static.bdocx.com/images/bang_tan.gif)