VB选择题(整理).doc

《VB选择题(整理).doc》由会员分享，可在线阅读，更多相关《VB选择题(整理).doc（13页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、1. 下列不属于VB三种模式的是（ ）。A) 代码 B) 设计 C) 运行 D) 中断2以下（ ）函数输出的结果为数值型。A) ASC B) String C) Format D) InputBox3. 设字符串变量X$=”ABCDEFGH”，Y$=”XY”，那么InStr(X$, “CDE”)的值为（ ）。A) 2 B) 3 C) 0 D) 54下列各数据类型的取值范围按从小到大排列的是（ ）。A) 整型、长整型、双精度、单精度 B) 整型、变体型、单精度、双精度C) 整型、长整型、单精度、双精度 D) 长整型、货币型、单精度、双精度5设x=”ABC”，y=”AB”，函数IIF(xY, -1

2、, 0)的返回值是（ ）。A) 1 B) 出错 C) 1 D) 06表达式 10 Mod 4 2 + ( 1 = 1 ) 的值是（ ）。A) 2 B) 10 C) 3 D) 97对语句 if x=0 then y=0 ，说法正确的是（ ）。A) “x=0”是赋值语句，“y=0”是关系表达式 B) “x=0”是赋值语句，“y=0”也是赋值语句 C) “x=0”是关系表达式，“y=0”是赋值语句 D) “x=0”是关系表达式，“y=0”也是关系表达式8下列表达式的运算结果中，值最小的是（ ）。A) 6 Mod 5 B) 56 C) 5 Mod 6 D) 5 /69下列不能判断整型变量x是5的倍数的

3、表达式是（ ）。A) x Mod 5 = 0 B) Int(x/5) = (x/5) C) x/5 = x5 D) 5 Mod x = 010窗体的（ ）属性设置在程序运行时才能起作用。A) BorderStyle B) Top C) Caption D) BackColor11下列（ ）不是合法常量。A) #2009-12-26# B) 2009-12-26 C) 2009.12E26 D) ”2009-12-26”12执行语句Command1.Move 500, 1000的结果是（ ）。A) 命令按钮移动到距窗体左边界500，上边界1000的位置 B) 命令按钮移动到距屏幕左边界500，上

4、边界1000的位置 C) 命令按钮向左移动500，向上移动1000 D) 命令按钮向上移动500，向左移动100013下列关于MsgBox函数的叙述中，不正确的是（ ）。A) 函数调用后返回值为数值型 B) 可以指定消息框的默认按钮C) 可以省略任何参数 D) 可以设定消息框的指定图标14下列语句能显示具有“终止”、“重试”和“忽略”按钮的消息框，且“重试”为默认按钮的是（ ）。A) MsgBox “信息提示”, VbYesNoCancel + VbDefaultButton1B) MsgBox “信息提示”, VbYesNoCancel + VbDefaultButton2C) MsgBox

5、 “信息提示”, VbAbortRetryIgnore + VbDefaultButton1 D) MsgBox “信息提示”, VbAbortRetryIgnore + VbDefaultButton215下列叙述错误的是（ ）。A) 当文本框的内容发生变化时，必将触发Change事件 B) 设置文本框的MaxLength属性，可限制其输入文本的最大长度C) 文本框ScrollBars属性值为2时，才能使文本框显示多行内容D) 当光标从文本框中移走时，发生LostFocus事件16. 对于程序中的一条声明语句：Const Pi=3.14，下列说法错误的是（ ）。A) 此语句定义的Pi为一个用

6、符号表示的变量B) 符号常量Pi为单精度型C) 本语句和声明语句Private Const Pi=3.14是一样的D) 定义后的符号常量Pi可以直接被使用17下列叙述中，错误的是（ ）。A) 要强制显式声明变量，可在窗体或标准模块的声明段中加入Option ExplicitB) 若在某过程中直接使用未定义的变量X，则该X的初值为空、类型为VariantC) 若在某过程中用Const x=5定义x，则在该过程的后续语句中对x只能读不能写D) 用Dim x=5 As Integer定义的变量x，其初值为整数518要使标签显示时不覆盖其背景内容，要对（ ）属性进行设置。A) ForeColor B)

7、 BorderStyle C) BackStyle D) BackColor19. 以下（ ）可以把命令按钮的标题文字设置为楷体。A) Command1.Name=”楷体_GB2312” B) Command1.Caption=”楷体_GB2312” C) Command1.FontName=”楷体_GB2312” D) Command1. FontName=楷体_GB231220窗体上有命令按钮Command1、标签Label1和计时器Timer1，若要在标签中动态显示时间，则语句Label1.Caption=Time必须放在（ ）事件过程中。A) Timer1_Timer B) Timer

8、1_Click C) Label1_Click D) Command1_Click21下列程序段是判断输入的正整数n是否为素数。Dim i%, n%, t%n=Val(InputBox(“n=”)For i=2 To n2 If n/i=ni Then t=1 【1】 EndIfNext iIf 【2】 Then Print “不是素数” Else “是素数”以上程序段空缺处【1】和【2】应分别填写（ ）。A) i=i+1和t=0 B) Exit For和 t=0 C) Exit For 和t=1 D) i=i+1和t=122如下程序段的功能是计算s=1-1/2+1/3-+(-1)(n-1)/

9、n的值。Dim i%, t%, n%【1】n=Val(InputBox(“n=”)t=1For i=1 To n s=s+t/i 【2】Next iPrint “s=”, s程序的空缺处【1】和【2】应分别填写（ ）。A) Dim s%和t=-1 B) Dim s！和t=-1 C) Dim s%和t=-t D) Dim s!和t=-t 23窗体上有命令按钮Command1，编写Command1事件过程：Sub p1(b( ) as Integer) Dim n% For i=UBound(b) to Lbound(b) Step -1 Print b(i); n=n+1 if n3=n/3 t

10、hen print Next iEnd SubPrivate Sub Command1_Click( )Dim a%(5)For i=0 to 5 a(i)=(i+1)2Next iP1 a( )End Sub运行后，单击命令按钮，输出的结果为（ ）。A) 1 4 9 B) 36 25 16 16 25 36 9 4 1C) 1 4 9 16 25 36 D) 36 25 16 9 4 124要判断是否按了Pause键，应在（ ）事件中判断。A) Click B) Keypress C) GotFocus D) KeyDown25在文本框中输入文字会发生许多事件，这些事件发生的顺序为（ ）。A

11、) KeyPress, KeyUp, Change B) KeyUp, KeyPress, Change C) KeyDown, KeyPress, Change D) KeyDown, Change, KeyPress 26下列叙述错误的是（ ）。A) 键盘KeyDown事件可接收键盘所有按键的信息B) 键盘KeyPress事件可接收键盘所有按键的信息C) 键盘KeyPress事件可区分大小写字母D) 键盘KeyDown事件不区分大小写字母27在窗体的MouseDown和MouseUp的事件过程中，能用来检查鼠标右键和Ctrl键同时按下的表达式为（ ）。A) (Button=1 and Sh

12、ift=1) = True B) (Button=2 and Shift=1) = True C) (Button=1 and Shift=2) = True D) (Button=2 and Shift=2) = True28运行下列程序，单击Command1，则在文本框中显示的内容是（ ）。Private Sub Command1_Click( )Dim x, y%, z as Integerx=6 : y=9 : z=0Text1.text=”Call p1(x,y,z)Text1.text=zEnd SubSub p1(ByVal a$, ByVal b$, c%) c=a+bEnd

13、SubA) 程序错误 B) 0 C) 69 D) 1529若定时器Timer1的Interval属性为500，Enable属性为True，运行下列程序2秒，窗体显示内容为（ ）。Dim i%Private Sub Timer1_Timer() i=i+1 print String(i, “*”);End SubA）* B）* C）* D）* * * *30阅读下列程序：Private Sub Form_Click( )Static m%, n%For i= 1 To 2n=n+im=m+n2NextEnd Sub运行时，2次单击窗体，则第2次单击窗体时m，n的值分别为（ ）。A) 62，6 B

14、) 62，3 C) 10，3 D) 52，631运行下列程序，c和x的值分别为（ ）。Public Function f1%(m%,Byval n%)Dim r%If m0 m = n : n=r : r=m Mod nLoopF1=nEnd FunctionPrivate Sub Command1_Click( )Dim x%, y%, c% x=48 : y=72 c=f1(x, y)End SubA) 24，72 B) 24，48 C) 24，24 D) 12，2432在VB的“通用声明”段有语句Option Base 1，那么用如下语句声明的数组a包含的元素个数为（ ）。 Dim a(

15、-1 To 2, 3, 4)A) 80 B) 36 C) 48 D) 6033在不浪费存储空间的前提下存放如下方阵的数据，数组声明语句应为（ ）。 3.4 4.5 1.4 6.72.5 2.6 2.4 3.88.7 9.7 9.3 3.6A) Dim a(1 to 3, 1 to 4) As Integer B) Dim a(-2 to 0, 3) As SingleC) Dim a(12) As Single D) Dim a(3, 4) As Single34以下定义数组或数组元素赋值的语句中，错误的是（ ）。A) Dim a() B) Dim a As Variant a=Array(1

16、,2,3,4,5) a=Array(1,2,3,4,5) i=UBound(a) i=LBound(a)C) Dim a%() D) Dim aa=Array(1,2,3,4,5) a=Array(1,2,3,4,5)35. 以下数组A在子过程或函数中定义为形式参数，正确的语句是（ ）。A) Private Static Sub sale(A( ) As Integer) As IntegerB) Private Sub sale (ByVal A( ) As Integer)C) Private Function sale(A( ) As Integer) As StringD) Priva

17、te Sub sale(A( ) As Integer) As Integer36下列程序的运行结果是（ ）。Private Sub Command1_Click( ) Dim a a=Array(1,2,3,4,5,6,7) For i=LBound(a) To UBound(a)a(i)= a(i)* a(i) Next i Print a(i)End SubA) 下标越界 B) 0 C) 36 D) 4937定义通用过程：Sub f(x As Integer, y As Integer, z As Integer)，再设a，b，c为整形变量，则调用该过程的语句为（ ）。A) f (a,

18、b, c) B) f a, b, c C) Call f D) x=f (a, b, c)38关于过程的作用域，以下描述错误的是（ ）。A) 在不同模块中定义的模块级过程可以同名 B) 全局过程的作用域是整个工程 C) 在某窗体上定义的全局过程，若被其他模块调用，必须在该过程名前加上窗体名称 D) 在不同模块中定义的全局过程不能同名39假定建立了一个名为Command1的命令按钮数组，则以下说法中错误的是（ ）。A) 数组中每个命令按钮的名称均为Command1 B) 数组中所有命令按钮可以使用同一个事件过程 C) 数组中每个命令按钮的标题必须相同 D) 用Command1（下标）可以访问数组

19、中每个命令按钮40下列关于Shape控件说法错误的是（ ）。A) BorderStyle属性可以改变其边框颜色 B) FillStyle属性可以修改其填充样式 C) Shape属性用于设置显示的几何形状 D) FillColor属性可以改变填充颜色41下列（ ）语句可绘制扇形。A) Circle (1500,1500),500,-1,-2 B) Circle (1500,1500),500,-1,-2C) Circle (1500,1500),500,1,2 D) Circle (1500,1500),500,1,242. 执行“Form1.Line (1500, 1000)-Step(100

20、0, 500),B”后，Form1的CurrentX的值为（ ）。A) 1000 B) 1500 C) 500 D) 250043以下程序段用于从键盘上输入一个字符串，在窗体上反向显示其内容（如输入“abcd”，显示“dcba”）。Private Sub Command1_click( )Dim i%, n%, s$, c$c=”s=InputBox(“请读入一个字符串：”)【1】For i=1 to n c=【2】Next iPrint cEnd SubA) n=Left(s) 和 Mid(s,i,1)+c B) n=Len(s) 和 Mid(s,i,1)+c C) n=Len(s) 和 c

21、+Mid(s,n,i) D) n=Len(s) 和 c+Mid(s,i,1)44如下程序段的功能是：利用公式e=1+1/1!+1/2！+1/n! 求自然对数的底e的近似值，要求累加到最后一项小于0.为止。Dim e#, t#, n%e=0 : t=1 : n=1do While 1/t【1】0. e=e+1/t t=【2】 n=n+1LoopPrint “自然对数的底e的近似值为”，e程序的空缺处【1】和【2】应分别填写（ ）。A) 和 t+n B) = 和t+n D) = 和t*n45运行下列程序段，总共执行的循环次数是（ ）。Dim m%, n%For m= 1 to 10 For n=1

22、 to m Step 2 Print n Next n Print m+nNext mA) 27 B) 28 C) 55 D) 3046设置列表框中MultiSelect为（ ），通过单击就能选择列表框中多项。A) 1 B) 2 C) True D) 047使用下列（ ）语句可删除组合框Combo1中选定的项。A) Combo1.RemoveItem Combo1.List(ListIndex)B) Combo1.RemoveItem Combo1.ListIndexC) Combo1.RemoveItem Combo1.List(Index)D) Combo1.RemoveItem Comb

23、o1.Text48要在组合框的文本框中禁止输入内容，Style属性应设置为（ ）。A) True B) 0 C) 1 D) 249设置滚动条的（ ）属性，单击滚动箭头与滚动块间的区域时可改变滚动步长。A) SmallChange B) Max C) Largechange D) Min50使用滚动条控件时，错误的是（ ）。A) 当拖动滚动块时只触发Scroll事件B) 拖动滚动块时可同时触发Scroll事件和Change事件C) 滚动条的Value值在min, max范围变化D) 滚动条的Value值发生一次变化就触发一次Change事件51下面说法正确的是（ ）。A) 组合框中的文本框一定有

24、文本编辑作用 B) 组合框是组合了文本框和列表框的功能而形成的一种控件 C) 组合框包含了列表框的所有属性 D) 组合框是包含了文本框和列表框的控件数组52窗体上有一个通用对话框ComDlg1, 语句ComDlg1.Action=2表示（ ）。A) 显示“字体”对话框 B) 显示“颜色”对话框C) 显示“打开”对话框 D) 显示“另存为”对话框53文件列表框中用于设置所选文件路径的属性是（ ）。A) FileName B) File C) Path D) FilePath54.下列关于文件的叙述中，错误的是（ ）。A) 可以通过编程修改顺序文件中的某条记录 B) 随机文件每条记录的长度必须相同

25、C) 顺序文件可以使用文本编辑软件编辑 D) 随机文件可以随机读/写文件中的记录55对二进制文件进行写操作的语句是（ ）。A) Write #文件号，变量名 B) Print #文件号，变量名 C) Get #文件号，变量名 D) Put #文件号，变量名56以下叙述中错误的是（ ）。A) 如果把一个菜单项的Enabled属性设置为Fasle，则该菜单项处于非激活状态 B) 分隔线菜单项不能响应Click事件 C) 在多窗体程序中，每个窗体都可以建立自己的菜单 D) 建立弹出式菜单不需要使用“菜单编辑器”57. 下列使用Print方法不正确的是（ ）。A) Debug.Print B) Tex

26、t1.Print C) Form1.Print D) Printer.Print58. 下列（ ）语句不能清除图片框Picture1中用Print显示的文本。A) Picture1.Clear B) Picture1.ClsC) Picture1. Picture=LoadPicture( ) D) Picture1. Picture=LoadPicture()59. 在一组单选按钮中，要使某个按钮默认获得焦点，应设置该按钮的（ ）。A) TabIndex属性值为0 B) TabIndex属性值为1C) TabStop属性值为True D) TabStop属性值为False60. 以下叙述错误

27、的是（ ）。A) 用Hide方法隐藏的窗体仍在内存中B) 可用Move方法移动时钟控件C) 可用Show方法显示工程中的各窗体D) 可用Print方法在窗体、立即窗口和打印机输出表达式的值61. 下面的操作中，（ ）不能触发命令按钮的Click事件。A) 如果命令按钮有访问键字母，同时按Alt键+该字母键B) 把焦点移到命令按钮上，然后按Enter键C) 鼠标左键单击命令按钮D) 鼠标右键单击命令按钮62. 下面关于菜单的叙述中，正确的是（ ）。A) 菜单项是一个控件，有外观和行为的属性B) 菜单项的事件有Click和DblClickC) 要把非顶级菜单设为分隔线，只要将菜单项的标题设为“-”

28、，名称可省略D) 如果某个菜单项设置了访问键（热键），程序运行时可以使用Ctrl+该访问键操作它63. 通过下列事件过程，欲在文本框Text1中选择8个字符复制到Text2中，程序第一次运行不能成功，原因是（ ）。Private Sub Command1_Click()Text2.Text=Text1.SelTextText1.SelStart=0Text1.SelSLength=8End SubA) Text2的属性使用不对 B) 不能确定C) Text1的属性使用不对 D) 语句顺序不对64. 运行以下程序后，在文本框Text1中输入”1234”字符串，变量k的值是（ ）。Dim k As

29、 IntegerPrivate Sub Text1_KeyPress(KeyAscii As Integer)k= KeyAscii + kEnd SubA) 202 B) C) 10 D) 123465. 将命令按钮的Picture属性设置为一个图片后，命令按钮上并不显示该图片，原因是（ ）。A) 该命令按钮的Style属性设置为0 B) 该命令按钮的Style属性设置为1C) 该命令按钮的Enabled属性设置为True D) 该命令按钮的Enabled属性设置为False66. 有如下事件过程：Private Sub Form_MouseDown(Button As Integer, S

30、hift As Integer, X As Single, Y As Single)Form1.Print Button; ShiftEnd Sub该过程执行后，窗体上显示“2 2”，说明（ ）。A) 用户按下了鼠标左键，同时按下了键盘上的Shift键 B) 用户按下了鼠标右键，同时按下了键盘上的Shift键C) 用户按下了鼠标左键，同时按下了键盘上的Ctrl键D) 用户按下了鼠标右键，同时按下了键盘上的Ctrl键67. 对象可以执行的动作和可被对象识别的动作分别称为（ ）。A）属性、方法 B）过程、方法 C）事件、方法 D）方法、事件68. 窗体之间可以通过（ ）传递数据。A）全局变量 B）

31、静态变量 C）模块变量 D）过程变量69. 已将文本框的Multiline属性设置为True，但文本框中文本（长度已超过文本框宽度）并不按多行显示，其原因是（ ）。A）文本框未设置水平滚动条 B）文本框未设置垂直滚动条C）文本框设置了水平滚动条 D）文本框设置了垂直滚动条70. 如果一个工程含有多个窗体及标准模块，以下叙述正确的是（ ）。A）如果标准模块中含有Sub Main过程，则只能由该过程启动工程B）如果有窗体，则只能由窗体启动工程C）Sub Main过程和各个窗体均有可能被设置为启动对象D）只能由标准模块启动工程71 . 要使某控件不能通过Tab键获得焦点，应设置该控件的（ ）属性为F

32、alse。A）ToolTipText B）TabStop C）TabIndex D）Default72. 当窗体被卸载时，最后引发的事件是（ ）。A）Unload B）Terminate C）QueryLoad D）Deactivate73. 窗体上有文本框Text1，编写如下事件过程，运行时，向文本框输入字符“a”，文本框接收到的字符是（ ）。Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)KeyCode = KeyCode + 1 End SubA）”A” B）”B” C）”a” D）”b”74. 组合框的事件与

33、Style属性有关，下列说法错误的是（ ）。A）Style为1时，响应Click, DblClick, Change事件 B）Style为1时，响应Click, Change, DropDown事件C）Style为0时，响应Click, DblClick, DropDown事件D）Style为0时，响应Click, Change, DropDown事件75. 执行下列过程后，x的值是（ ）。Dim x$, n$, a%Private Sub Command1_Click( ) n=23 Do While n 0 a=n Mod 2 n=n2 x=Chr(48+a) & x LoopEnd Su

34、bA）10101 B）10110 C）11111 D）1011176. 在KeyDown或KeyUp的事件过程中，能用来检查Ctrl和F4同时按下的表达式是（ ）。A）(KeyCode And vbKeyF4) And (Shift And vbCtrlMask)B）(KeyCode = vbKeyF4) And (Shift And vbCtrlMask)C）(KeyCode = vbKeyF4) And (Button = vbCtrlMask)D）KeyCode = vbKeyF4 + vbCtrlMask77. 下列关于多文档界面（MDI）的叙述中错误的是（ ）。A）MDI 应用程序允

35、许同时显示多个文档，每个文档显示在它自己的窗口中B）MDI父窗体和子窗体都可以有各自的菜单，当子窗体加载时，子窗体菜单覆盖MDI窗体的菜单C）MDI父窗体和子窗体可以像普通窗体那样编写代码D）MDI子窗体的设计受到MDI父窗体的约束78. 若在窗体模块的声明部分声明了如下自定义类型和数组：Private Type stuid As Integername As StringEnd TypeDim a(4) As stu下列输出语句中正确的是（ ）。A）Print a.id, a.name B）Print a.id(2), a.name(2)C）Print a(2).id, a(2).name

36、D）Print id(2), name(2)79.大键盘上“3”键的上档字符是“#”，当按住Shift再按住大键盘上“3”键时，KeyPress事件过程接收到的KeyAscii参数是（ ）。A）48 B）65 C）51 D）3580如果一个工程含有多个窗体和标准模块，以下叙述中错误的是（ ）。A）在多个窗体中，可以用关键字Me代表程序代码所在的窗体B）Load语句把一个窗体装入内存，但此时窗体并没有显示出来 C）只有启动窗体才有菜单D）任何时刻最多只有一个窗体是活动窗体81. 在窗体上有一个列表框和一个命令按钮，其名称分别为List1和Command1。编写如下事件过程：Private Sub

37、 Command1_Click()List1.List(List1.ListCount - 1) = 等级考试End Sub程序运行后，单击命令按钮，其结果为（ ）。A）把字符串等级考试插入到列表框的最前面 B）把字符串等级考试添加到列表框的最后面 C）把列表框原有的最后一项改为等级考试 D）把字符串等级考试添加到列表框中，但位置不能确定82. 窗体上有一个命令按钮Command1，编写下列事件过程：Private Sub Command1_Click() Msgbox Clng(225.6)End Sub程序运行时，单击按钮，消息对话框显示的内容是（ ）。A）225 B）225.6 C）22

38、5.60 D）22683. 在立即窗口运行下列语句后，（ ）。a=”fujian” ：b=”fuzhou” ：print a;bA）”fujian”和”fuzhou” 之间没有空格 B）”fujian”和”fuzhou” 之间有一个空格C）”fujian”和”fuzhou” 有7个空格 D）”fujian”和”fuzhou” 有6个空格84. 下列关于复选框和单选按钮的说法中正确的是（ ）。A）两者的Value属性的缺省值都为Unchecked B）两者的Value属性的缺省值都为CheckedC）复选框的Value属性的缺省值为Unchecked，单选按钮为False D）两者的Value属

39、性的缺省值都为False85. 下列关于多文档界面（MDI）的叙述中错误的是（ ）。A）MDI 应用程序允许同时显示多个文档，每个文档显示在它自己的窗口中B）MDI父窗体和子窗体都可以有各自的菜单，当子窗体加载时，子窗体菜单覆盖MDI窗体的菜单C）MDI窗口中可以有多个活动窗口D）MDI窗体的ActiveControl属性可以返回具有焦点或者最后被激活的控件86. 以下有关数组的说明中，正确的是（ ）。A）在过程中可以用Private语句定义数组B）无论是动态数组还是静态数组，数组一旦定义，其维数是不能重新定义的C）根据数组元素数目是否可变，可将数组分为动态数组和静态数组D）用Redim语句重新定义维数后，原有的数组元素内容将不予保留87. A）48 B）65 C）51 D）3587. A）48 B）65 C）51 D）3588. A）48 B）65 C）51 D）