VB选择题(整理).doc

上传人:飞****2 文档编号:78789106 上传时间:2023-03-19 格式:DOC 页数:13 大小:62.50KB
返回 下载 相关 举报
VB选择题(整理).doc_第1页
第1页 / 共13页
VB选择题(整理).doc_第2页
第2页 / 共13页
点击查看更多>>
资源描述

《VB选择题(整理).doc》由会员分享,可在线阅读,更多相关《VB选择题(整理).doc(13页珍藏版)》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。

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)

展开阅读全文
相关资源
相关搜索

当前位置:首页 > 教育专区 > 教案示例

本站为文档C TO C交易模式,本站只提供存储空间、用户上传的文档直接被用户下载,本站只是中间服务平台,本站所有文档下载所得的收益归上传人(含作者)所有。本站仅对用户上传内容的表现方式做保护处理,对上载内容本身不做任何修改或编辑。若文档所含内容侵犯了您的版权或隐私,请立即通知淘文阁网,我们立即给予删除!客服QQ:136780468 微信:18945177775 电话:18904686070

工信部备案号:黑ICP备15003705号© 2020-2023 www.taowenge.com 淘文阁