1、VB 语言程序设计(1/44)VB 支持自定义数据类型,在某程序中我们定义了如下类型 : Type Studentnumber As stringname As Stringage As IntegerEnd Type 针对上述定义,如下几项用法正确的是:( ) 正确答案：B AStudent.name=“张三“ BDim s As Student s.name“张红“ CDim s As Type Students.name=“张三“ DDim s As Types.name=“张三“(2/44) 以下能够触发文本框 Change 事件的操作是( ) 正确答案：D A文本框失去焦点 B文本框
2、获得焦点 C设置文本框的焦点 D改变文本框的内容(3/44) 下面程序运行后输出的结果是( ) 正确答案：BDIM C1,C2 C1=“CHINA“ C2=STRING$(2, C1) PRINT Left(C1,1) + C2移除错题 ACHI BCCC CINA DAAA(4/44) 设窗体上有一个文本框,名称为 text1,程序运行后 ,要求该文本框不能接受键盘输入,但能输出信息,以下属性设置正确的是: 正确答案： B Atext1.maxlength=0 Btext1.enabled=flase Ctext1.visible=flase Dtext1.width=0(5/44) 用于返
3、回窗体可用区域宽度的属性是( ) 正确答案：A AScaleWidth BScaleLeft CScaleHeight DScaleTop(6/44) Visual Basic 提供的 On Error Resume next 错误陷阱语句表示( ) 正确答案：C A当发生错误时，使程序转跳到语句标号为 0 的程序块 B当发生错误时，不使用错误处理程序块 C当发生错误时，忽略错误行，继续执行下一语句 D当发生错误时，终止本过程执行，继续执行下一过程(7/44)为了检测到用户按下键盘上的所有键,应该使用的键盘事件为( ) 正确答案：C AKeyPress BMouseDown CKeyDown
4、DMouseUp(8/44) 当一个复选框被选中时,它的 Value 属性的值是 ( ) 正确答案：C A3 B2 C1 D0(9/44) 通用对话框控件和文件列表框控件中,都能根据文件的类型对要显示的文件进行筛选过滤,后者使用( )属性进行该项设置。正确答案：A APattern BPath CFilter DFileName(10/44) 语句 DIM ARRAY(0 to 3,4,1 to 6)中定义的数组有( )个元素。正确答案：C A12 B60 C120 D34511/44) 把 MsgBox 的返回值转换为数值应该使用的函数是( ) 正确答案：D ALog BStr CLen D
5、Val(12/44) 用于设置通用对话框控件显示文件类型的属性是( ) 正确答案：A AFilter BPath CPartern DFoleName(13/44) 在窗体上放置一个命令按钮,名称为 Command1。单击命令按钮时,执行如下事件过程: Private Sub Command1_C1ick()a$=“software and hardware“b$=Right(a$,8)c$=Mid(a$,1,8)Msgbox a$,b$,c$,1End Sub 则在弹出的信息框的标题栏中显示的信息是( )正确答案：D AsoftWare and hardware Bsoftware Char
6、dwafe D出现错误(14/44)下列关于窗体上控件的基本操作错误的是: 正确答案：A A下一次 DEL 键只能删除一个控件 B按下一次 DEL 键可以同时删除多个控件 C按住 SHIFT 键，然后单击每个要选择的控件，可以同时选中多个控件 D按住 ALT 键，然后单击每个要选择的控件，可以同时选中多个控件(15/44) 下列关于属性设置的叙述错误的是: 正确答案： A A一个控件具有什么属性是 VB 预先设计好的，用户不能改变 B一个控件具有什么属性是 VB 预先设计好的，用户可以改变 C一个控件的属性即可以在属性窗口中设置，也可以用程序代码设置 D一个控件的属性在属性窗口中设置，还可以利
7、用程序代码为其设置新值(16/44)对于复选框控件 chkBoy,如果在程序中设置它为选中状态 ,下面语句正确的是( ) 移除错题正确答案：D AchkBoy.Checked = true BchkBoy.Value = true CchkBoy.Selected = true DchkBoy.Value = 1(17/44) 一个对象所能做的事情称为对象的( ) 正确答案：D A继承 B属性 C封装 D方法(18/44) 在窗体上画一个名称为 Text1 的文本框,然后画一个名称为 HScroll1 的滚动条,其 Min 和 Max 属性分别为 0 和 100。程序运行后,如果移动滚动框,则
8、在文本框中显示滚动条的当前值,以下能实现上述操作的程序段是( ) 正确答案：A APrivate Sub HScroll_Change() Text1.Text=HScroll1.Value End Sub BPrivate Sub HScroll_Click() Text1.Text=HScroll1.Value End Sub CPrivate Sub HScroll_Change() Text1.Text=HScroll.Caption End Sub DPrivate Sub HScroll_Click() Text1.Text=HScroll.Caption End Sub(19/4
9、4) 设 x=4,y=8,z=7,表达式 xz) Or z正确答案：D A1 B-1 CTrue DFalse(20/44) 在程序中,使用 InputBox 函数可以接受用户的输入 ,如果要把它的返回值转换为数值型的数据,应该使用的函数是( ) 正确答案：A AVal BLen CStr DLog(21/44)动态数组因为在程序运行前无法确定数组的大小,所以经常根据程序的运行情况,对数组进行重新定义,以下关于 VB 中动态数组的叙述中不正确的是 ( ) 正确答案：B A可以用 ReDim 语句重新定义动态数组，并且可以进行多次重定义 B首次用 Dim 进行动态数组声明的时候，必须指明它的类型
10、和上下界 CPreserve 为 ReDim 语句的可选参数，用于保留动态数组原来的内容 D当对动态数组使用 Erase 语句进行释放操作时，将释放其内存(22/44) 在运行时,按 TAB 键跳过了一个可以获得焦点的控件(如文本框),则可能是因为( ) 正确答案： D A该控件的 TABSTOP 属性值为 TRUE B该控件的 TABINDEX 属性值为 FALSE C该控件的 ENABLED 属性值为 TRUE D该控件的 ENABLED 属性值为 FALSE(23/44) 变量未赋值时,数值型变量的值为( ) 正确答案：A A0 B空 C1 D无任何值(24/44) 以下语句的输出结果是
11、( ) Print Format$(32548.5, “000,000.00“)正确答案：C A32548.5 B325，485.00 C032，548，50 D32， 548，50(25/44) 以下关于 MsgBox 的叙述中,错误的是( ) 正确答案：D AMsgBox 函数返回一个整数 B通过 MsgBox 函数可以设置信息框中图标和按钮的类型 CMsgBox 语句没有返回值 DMsgBox 函数的第一个参数是一个整数，该参数只能确定对话框中显示的按钮数量(26/44) 语句 DIM AA(3,4,5)中定义的数组有多少个元素( ) 正确答案：C A12 B60 C120 D345(2
12、7/44)在窗体上画一个名称为 Command1 的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() x=InputBox(“Input“) Select Case x Case 1,3 Print “分支 1“ Case Is 4 Print “分支 2“ Case ElsePrint “Else 分支 “ End Select End Sub 程序运行后,如果在输入对话框中输入 2,则窗体上显示的是( ) 正确答案：C A分支 1 B分支 2 CElse 分支 D程序出错(28/44) VB 应用程序的运行模式是( ) 正确答案：C A解释运行模式
13、 B编译运行模式 C两者都有 D汇编模式(29/44)设菜单中有一个菜单项为“Open”。若要为该菜单命令设计访问键 ,即按下 Alt 及字母 O 时,能够执行“Open”命令,则在菜单编辑器中设置“Open”命令的方式是( ) 正确答案：A A把 Caption 属性设置为 &Open B把 Caption 属性设置为 O&pen C把 Name 属性设置为&Open D把 Name 属性设置为 O&pen(30/44)运行时,当用户向文本框输入新的内容,或在程序代码中对文本框的 TEXT 属性进行赋值从而改变了文本框的 TEXT 属性值时,将触发文本框的( )事件。 正确答案：D ACLI
14、CK BDBLCLICK CGOTFOCUS DCHANGE(31/44) 下列关于控件画法的叙述错误的是( ) 正确答案：D A单击一次工具箱中的控件图标，只能在窗体上画出一个相应的控件 B按住 CTRL 键后单击一次工具箱中的控件图标，可以在窗体上画出多个相同类型的控件 C双击工具箱中的控件图标，所画控件的大小和位置是固定的 D不合用工具箱中的控件工具，不可以在窗估上画出图形对象，但可以写入文字字符(32/44) 以下( ) 程序段可以实施 X、Y 变量值的变换( ) 正确答案：C AY=X：X=Y BZ=X：Y=Z：X=Y CZ=X：X=Y：Y=Z DZ=X：W=Y：Y=Z：X=Y(33
15、/44) 决定标签(Label)显示的属性是 ( ) 正确答案：C AText BName CCaption DAlignment(34/44) 关于滚动条控件,下面说法错误的是: 正确答案： D A点击滚动条的箭头，可以改变它的 value 值，从而引发 Change 事件 B拖动滚动框，可以触发 Scroll 事件 C通常，水平滚动条的值从左向右递增，垂直滚动条的值自上而下递增 D拖动滚动框，可以触发 Change 事件，而且是连续触发的(35/44) 在运行阶段,要在文本框 TEXT1 获得焦点时选中文本框中所有内容,对应的事件过程是( ) 正确答案：A APrivate Sub Tex
16、t1_GotFocus( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End Sub BPrivate Sub Text1_LostFocus( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End Sub CPrivate Sub Text1_Change( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End Sub DPrivate Sub Text1_SetFocus( )Text1.SelStart=0Text1.Sellength=
17、Len(Text1.Text)End Sub(36/44) 一个工程中包含两个名称分别为 Form1、Form2 的窗体,一个名称为 mdlFunc的标准模块。假定在 Form1、Form2 和 mdlFunc 中分别建立了自定义过程,其定义格式为: 正确答案：BForm1 中定义的过程:Private Sub frmfunction1()End SubForm2 中定义的过程:Public Sub frmfunction2()End SubmdlFunc 中定义的过程:Public Sub mdlFunction()End Sub在调用上述过程的程序中,如果不指明窗体或模块的名称,则以下叙述
18、中正确的是( ) A上述三个过程都可以在工程中的任何窗体或模块中直接被调用 B只有 mdlFunction 过程能够被工程中各个窗体或模块直接被调用 Cfrmfunction1 只能在 form1 中调用，而 frmfunction2 则可以在所有模块或窗体中被直接调 D上述三个过程都只能在各自被定义的模块中直接调用(37/44) 计时器(Timer)控件用于每隔一段时间自动触发一次 Timer 事件,可以有规律地重复执行一段程序,它用于设置两次事件时间间隔的属性是( ) 正确答案：A AInterval BSmallChange CLargeChange DMax(38/44) 为了防止用户
19、随意将光标置于控件上,应( ) 正确答案：D A将控件的 TABINDEX 属性设置为 0 B将控件的 TABSTOP 属性设置为 TRUE C将控件的 TABSTOP 属性设置为 FALSE D将控件的 ENABLED 属性设置为 FALSE(39/44) 为了使用通用对话框进行打开文件的操作,应将通用对话框的 Action 属性设定为( ) 正确答案： B A0 B1 C2 D3(40/44)假定有以下程序段: For i=1 to 3 For j=5 to 1 Step 1 Print i*j Next j,i 则语句 Print i*j 的执行次数是( ) 正确答案：A A15 B16
20、 C17 D18(41/44) Visual Basic 继承了 Basic 语言简单易用的语法特点,同时支持面向对象的编程机制,其中构成其控件(对象)的三要素是( ) 正确答案：D A属性、事件、事件过程 B控件、窗体、事件 C属性、过程、方法 D属性、事件、方法(42/44) 利用下面哪个函数可判定访问文件时是否已到文件尾( ) 正确答案：C ALOF BLOC CEOF DBOF(43/44) 应用程序设计完成后,应将程序保存,保存的过程是( ) 正确答案：D A只保存窗体文件即可 B只保存工程文件即可 C先保存工程文件，之后保存窗体文件 D先保存窗体文件（或标准模块文件），之后还要保存工程文件(44/44) 从键盘上输入两个字符串,分别保存在变量 str1、str2 中。确定第二个字符串在第一个字符串中起始位置的函数是( ) 正确答案：D ALeft BMid CString DInstr
