VB单选题.docx
- 文档编号:12543617
- 上传时间:2023-06-06
- 格式:DOCX
- 页数:21
- 大小:27.03KB
VB单选题.docx
《VB单选题.docx》由会员分享,可在线阅读,更多相关《VB单选题.docx(21页珍藏版)》请在冰点文库上搜索。
VB单选题
1、VisualBasic的编程机制是。
A、可视化B、面向对象C、面向图形D、事件驱动
2、VisualBasic集成环境的大部分窗口都可以从主菜单项的下拉菜单中找到相应的打开命令。
A、编辑B、视图C、格式D、调试
3、每个窗体对应一个窗体文件,窗体文件的扩展名是。
A、.basB、.clsC、.frmD、.vbp
4、工程文件的文件名后缀是什么?
______
A.bmpB.vbpC.frmD.bas
5、窗体设计器是用来设计。
A、应用程序的代码段B、应用程序的界面
C、对象的属性D、对象的事件
6、使用方法不可以进入代码窗口编写代码。
A、执行“文件”菜单中的打开命令
B、在窗体上单击鼠标右键,在弹出的快捷菜单中选择“查看代码”命令
C、双击窗体设计器的任何地方
D、执行“视图”菜单中的“代码窗口”命令
7、VB6.0集成开发环境有三种工作状态,不属于三种工作状态之一的是。
A.设计状态B.编写代码状态C.运行状态D.中断状态
8、VB6.0集成开发环境不包括________窗口。
A.DOS界面窗口B.窗体窗口C.代码窗口D.属性窗口
9、在设计应用程序时,通过________窗口可以查看到应用程序工程中的所有组成部分。
A.代码窗口B.窗体设计窗口C.属性窗口D.工程资源管理器窗口
10、VB6.0是一种面向的编程环境。
A.机器B.对象 C.过程D.应用
11、在VB集成环境创建VB应用程序时,除了工具箱窗口,窗体中的窗口,属性窗口外,必不可少的窗口是。
A.窗体布局窗口B.立即窗口C.代码窗口D.监视窗口
12、不能打开属性窗口的操作是。
A.单击工具栏中的“属性窗口”按钮
B.选取“视图”菜单中的“属性窗口”子菜单项
C.在对象上单击右键,从弹出的快捷菜单中选择“属性窗口”选取项
D.选取“工程”菜单中的“属性窗口”子菜单项
13、事件的名称
A、都要由用户定义B、有的由用户定义,有的由系统定义
C、都是由系统预先定义D、是不固定的
14、对象的三要素不包括。
A、属性B、方法C、事件D、程序
15、对于窗体,下面属性在程序运行时其属性设置起作用。
(A)MaxButton(B)BorderStyle(C)Name(D)Left
16、要使Print方法在Form_Load事件中起作用,要对窗体的属性进行设置。
(A)BackColor(B)ForeColor(C)AutoRedraw(D)Caption
17、要使标签控件显示时不覆盖其背景内容,要对属性进行设置
(A)BackColor(B)ForeColor(C)BorderStyle(D)BackStyle
18、要使命令按钮不可操作,要对设置
(A)Enabled(B)Visible(C)BackColor(D)Caption
19、文本框没有属性
(A)Enabled(B)Visible(C)BackColor(D)Caption
20、不论何控件,共同具有的是属性
(A)Text(B)Name(C)ForeColor(D)Caption
21、要使Form1窗体的标题栏显示”欢迎使用VB”,以下语句正确。
(A)Form1.Caption=”欢迎使用VB”(B)Form1.Caption=’欢迎使用VB’
(C)Form1.Caption=欢迎使用VB(D)Form1.Caption=”\欢迎使用VB”
22、要使某控件在运行时不可显示,应对进行设置
(A)Enabled(B)Visible(C)BackColor(D)Caption
23、要使窗体在运行时不可以改变窗体的大小和没有最大,最小化按钮,只要对下面进行设置。
(A)MaxButton(B)BorderStyle(C)Width(D)MinButton
24、当运行程序时候,系统自动执行启动窗体的事件过程
(A)Load(B)Click(C)Unload(D)GotFocus
25、当文本框的ScrollBars属性设置了非零值,却没有效果,原因为。
(A)文本框中没有内容(B)文本框的MultiLine属性为False
(C)文本框的MultiLine属性为True(D)文本框的Locked属性为True
26、要判断在文本框时否按了Enter键,应在文本框的事件中判断
(A)Change(B)KeyDown(C)Click(D)KeyPress
27、在一个语句内写多条语句时,每个语句之间用()符号分隔。
(A),(B):
(C)、(D);
28、一句语句要在下一行继续写,用()符号作为续行符。
(A)+(B)-(C)_(D)…
29、下面()是合法的变量名。
(A)X_YZ(B)123ABC(C)integer(D)X-Y
30、下面()是不合法的单精度型常数
(A)100!
(B)100.0
(C)1E+2(D)100.0D+2
31、下面()是合法的单精度型变量
(A)num!
(B)sum%(C)xinte$(D)mm#
32、表达式16/4-2^5*8/4MOD5\2的值为()
(A)14(B)4(C)20(D)2
33、数学关系3<=x<10表示成正确的VB表达式为()
(A)3<=X<10(B)X>=3ANDX<10
(C)X>=3ORX<10(D)3<=XAND<10
34、已知A$=”12345678”则表达式Val(Left$(A$,4)+Mid(A$,4,2))的值为()
(A)123456(B)123445(C)8(D)6
35、表达式Len(“123程序设计ABC”)的值为()
(A)10(B)14(C)20(D)17
36、下面正确的赋值语句是()
(A)X+Y=30(B)Y=π*R*R(C)Y=X+30(D)3*Y=X
37、为了给X,Y,Z三个变量赋值为1,下面正确的赋值语句是()
(A)X=1:
Y=1:
Z=1(B)X=1,Y=1,Z=1(C)X=Y=Z=1(D)XYZ=1
38、已知A=3.5,B=5.0,C=2.5,D=True则表达式:
A>=0ANDA+C>B+3ORNOTD的值为()
(A)TRUE(B)FALSE(C)1(D)0
39、Int(198.555*100+0.5)/100的值为()
(A)198(B)199.6(C)198.56(D)200
40、下列符号常量的声明中,()是不合法的。
(A)ConstaAsSingle=1.1(B)ConstaAsInteger=”12”
(C)ConstaAsDouble=Sin
(1)(D)Consta=”OK”
41、以下语句的输出第一个结果是();第二个结果是()
a=sqr(3)
printformat(a,”$####.##”)
printformat(a,”$0000.##”)
(A)$1.732(B)$1.73(C)$1732(D)$0001.73
42、函数InStr(”VB程序,visualBasic,Vb”,”vb”)的值为()。
(A)0(B)1(C)18(D)Vb
43、PrivateSubForm_Click(
DimaAsInteger
StaticbAsInteger
a=b+1
b=a+b
Printa,b
EndSub
当鼠标单击了窗体4次时窗体显示的结果为[]。
(A)1,2(B)4,5(C)4,8(D)8,15
44、赋值语句的作用是()。
(A)赋值语句用于将表达式的值赋给变量(B)赋值语句用于将表达式的值赋给属性
(C)赋值语句用于将表达式的值赋给变量或属性(D)赋值语句用于将表达式的值赋给变量和属性
45、语句X=X+1的正确含义是()。
(A)变量X的值与X+1的值相等(B)将变量X的值存到X+1中去
(C)将变量X的值加1后赋给变量X(D)变量X的值为1
46、如果将布尔常量TRUE值赋给一个整型变量,则整型变量的值是()
A、0B、-1C、trueD、false
47、变量未赋值时,数值型变量的值为(),字符串变量的值为()
A、0B、空串C、nullD、没任何值
48、VB中的注释语句是()。
(A)执行语句(B)非执行语句(C)命令语句(D)结构化语句
49、在默认情况下InputBox$函数返回值的类型为()
(A)数值(B)字符串
(C)变体(D)数值或字符串(视输入的数据而定)
50、MsgBox函数中有4个参数,其中必须写明的参数是[]。
(A)指定对话框中显示按钮的数目(B)对话框标题
(C)提示信息(D)所有参数都是可选的
51、运行以下程序中变量Var3的结果是()。
DimVar1,Var2,Var3
Var1=”Hello”
Var2=”World!
”
Var3=Var1&““&Var2
Var1=10
Var2=20
Var3=Var1+var2
(A)”HelloWorld!
”(B)30(C)1020(D)出错
52、在窗体上画一个命令按钮,然后编写如下事件过程,程序运行后,单击命令按钮,先后在两个输入对话框中分别输入456和123,则输出结果分别是()和()
(1)PrivateSubCommand1_click()
a=InputBox(“EnterthefirstInteger”)
b=InputBox(“EntertheSecondInteger”)
Printb+a
EndSub
(2)PrivateSubCommand1_click()
Dima,bAsInteger
a=InputBox(“EnterthefirstInteger”)
b=InputBox(“EntertheSecondInteger”)
Printb+a
EndSub
(A)579(B)123(C)456(D)123456
53、Print方法可以在()对象上输出数据。
()
(A)窗体(B)桌面(C)标题栏(D)立即窗口
(E)图片框(F)状态栏(G)打印机(H)代码窗口
54、下列程序段的执行结果为[]。
X=2
PrintX+1;X+1
(A)33(B)X+1X+1(C)34(D)2+12+1
55、下面语句正确的是[]。
A.Ifx≠yThenPrint“x不等于y”B.Ifx<>yPrint“x不等于y”
C.Ifx<>yThenPrint“x不等于y”D.Ifx≠yPrint“x不等于y”
56、下面语句正确描述:
如果x≤3y且x>y,则y=x3是[]。
A.Ifx<=3*yandx>yTheny=x^3B.Ifand(x<=3y,x>y)Theny=x3
C.Ifx<=3*yandx>yTheny=x**3D.Ifx<=3*y:
x>yTheny=x3
57、下面程序段[]能够正确实现目的:
如果X () A.IfX PrintA A=-15A=-15: PrintA PrintA C.IfX A=15: PrintAA=-15 ElsePrintA A=-15: PrintAEndIf EndIf 58、在下面程序运行时键入2,则该程序的运行结果是[]。 Privatesubcommand1_click() X=inputbox(“请输入一个整数”) Selectcasex CaseIs<-3 Print(x+1)/(x+3) Case–3To3 Printx*x+1 CaseIs>3 Print(x+1)/(x-3) Endselect Endsub A.2B.0.6C.5D.-3 59、下列程序段的执行结果为[]。 x=5 y=-20 IfNotx>0Thenx=y-3Elsey=x+3 Printx-y;Y-x A.-33B.5-8C.3-3D.25-25 60、运行下列程序,输出的结果为_____。 PrivateSubForm_Click() s=0 Do s=(s+1)*(s+2) Number=Number+1 LoopUntils>=30 PrintNumber;s EndSub (A)01(B)3030(C)430(D)3182 61、运行下列程序,输出的结果为_____。 PrivateSubForm_Click() A$="54321": B$="abcde" j=1 DoWhilej<=5 PrintMid(A$,6-j,1)+Mid(B$,j,1); j=j+1 Loop Print EndSub (A)a1b2c3d4e5(B)a5b4c3d2e1(C)e1d2c3b4a5(D)1a2b3c4d5e 62、下面程序段的执行结果为_____。 I=0 Forg=10to19Step3 I=I+1 Nextg PrintI (A)4(B)5(C)3(D)6 63、运行下列程序,输出的结果为_____。 PrivateSubForm_Click() Forj=1To10 a=20-(2*j-1) Ifa/3=a\3Ora/5=a\5Then Sum=Sum+a EndIf Nextj Print"Sum=";Sum EndSub (A)Sum=27(B)Sum=15(C)Sum=32(D)32 64、运行下列程序,结果为_____。 PrivateSubCommand1_Click() a$="AWORKERISOVERTHERE" x=Len(a$) Fori=1Tox-1 b$=Mid(a$,i,2) Ifb$="ER"Thens=s+1 Nexti Prints EndSub (A)1(B)2(C)3(D)4 65、在窗体上画一个命令按钮,然后编写如下事件过程: PrivateSubCommand1_Click() DimStr1AsString,Str2AsString Str1=InputBox("请输入一个字符串") Fori=1ToLen(Str1) Str2=UCase(Mid(Str1,i,1))+Str2 Nexti PrintStr2 EndSub 程序运行后,单击命令按钮,如果在输入对话框中输入字符串"abcdefg",则单击"确定"按钮后在窗体上的输出结果为_____。 (A)abcdefg(B)ABCDEFG(C)gfedcba(D)GFEDCBA 66、运行下列程序,执行Printi*j的次数为_____。 PrivatSubForm_Click() Fori=1to3 Forj=5to1step–2 Printi*j Nextj Nexti EndSub (A)7(B)9(C)12(D)15 67、下面程序段的执行结果为______。 k=0 Forj=1to2 Fori=1to3 k=i+1 Nexti Fori=1to7 k=k+1 Nexti Nextj Printk (A)10(B)6(C)11(D)16 68、语句DimA(-3to5)AsInteger定义的数组的元素个数是____。 (A)6(B)7(C)8(D)9 69、语句OptionBase1: Dima(3,4)定义的数组中,所包含的数组元素的个数是_____。 (A)12(B)7(C)20(D)15 70、语句Dima(3,4,5)定义的数组中所包含的数组元素的个数是__。 (A)12(B)60(C)120(D)345 71、下面的数组声明语句中______是正确的。 (A)DimA[3,4]AsInteger(B)DimA(3,4)AsInteger(C)DimA[3;4]AsInteger(D)DimA(3;4)AsInteger 72、下列程序段的执行结果是_____。 DimM(10) ForI=0To10 M(I)=2*I NextI PrintM(M(3)) (A)12(B)6(C)0(D)4 73、下列程序段的执行结果是____ DimA(5) ForI=1to5 A(I)=I*I NextI PrintA(I-1) (A)5(B)25(C)0(D)16 74、设执行以下程序段时依次输入1、3、5,执行结果为_____。 Dima(4)AsInteger,b(4)AsInteger ForK=0To2 a(K+1)=Val(InputBox("请输入数据: ")) b(3-K)=a(K+1) NextK Printb(K) (A)1(B)3(C)5(D)0 75、下列程序段的执行结果为______。 DimM(10) ForK=1To10 M(K)=11-K NextK X=6 PrintM(2+M(X)) (A)2(B)3(C)4(D)5 76、下列程序段的执行结果为_____。 DimM(10),N(10) I=3 ForT=1To5 M(T)=T N(I)=2*I+T NextT PrintN(I);M(I) (A)311(B)315(C)113(D)153 77、以下说法不正确的是____。 (A)使用Redim语句可以改变数组的维数 (B)使用Redim语句可以改变数组的类型 (C)使用Redim语句可以改变数组每一维的大小 (D)使用Redim语句可以对数组中的所有元素进行初始化出错 78、以下_____是VisualBasic合法的数组元素。 (A)X9(B)X[9](C)X(I+1)(D)X(X(5))(E)x{6}(F)X(0) 79、下面的数组声明语句中_____是正确的。 (A)DimMA[1: 5,1: 5]AsString(B)DimMA(5To5)AsString (C)DimMA(1To5,1To5)AsString(D)DimMA(1: 5,1: 5)AsString (E)DimMA(1To5;1To5)AsString(F)DimMA(1To5,5)AsString 80、将图片框的_____属性设置为True时,可使图片框根据图片调整大小。 A、AutoSizeB、AutoReDrawC、PictureD、Stretch 81、下面叙述不正确的是___。 (单选题) A、驱动器列表框是一种能显示系统中所有有效磁盘驱动器的列表框 B、驱动器列表框的Drive属性只能在运行时被设置 C、从驱动器列表框中选择驱动器能自动地变更系统当前的工作驱动器 D、驱动器列表框中的Drive属性一发生改变,一定会触发Change事件 82、使用目录列表框的_____属性可以返回或设置当前工作目录的完整路径(包括驱动器盘符)。 (单选题) A、DriveB、PathC、DirD、ListIndex 83、文件列表框中用于设置或返回所选文件的路径的属性是_____。 (单选题) A、FileB、FilePathC、PathD、FileName 84、要触发目录列表框的Change事件为以下_____操作。 (单选题) A、单击所选目录B、双击所选目录C、在属性窗口设置其Path属性D、以上操作都不对 85、在目录列表框中,当前被选中的目录的ListIndex属性值为_____。 (单选题) A、-1B、0C、1D、不确定 86、编写如下事件过程: PrivateSubForm_KeyPress(KeyAsciiAsInteger) PrintChr(KeyAscii); PrintKeyAscii EndSub 运行程序,按下“a”键输出结果为_______。 (单选题) A、A65B、a97C、65AD、97a 87、将窗体的KeyPreview属性设置为True,然后编写如下事件过程: PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger) PrintChr(KeyCode); EndSub PrivateSubForm_KeyUp(KeyCodeAsInteger,ShiftAsInteger) PrintChr(KeyCode+32) EndSub 按下“a”键时,输出结果为_______。 (单选题) A、AaB、AAC、aaD、aA 88、编写如下事件过程: PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle) IfShift=3AndButton=2Then Print"BBBB" EndIf EndSub 运行后,为了在窗体上输出“BBBB”,应执行的操作为_______。 (单选题) A、同时按下Shift键和鼠标左键B、同时按下Shift键和鼠标右键 C、同时按下Ctrl键,Alt键和鼠标左键D、同时按下Ctrl键,Shift键和鼠标右键 89.下列关于Mouse
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VB 选题