VB语言程序设计

1、VB 语言程序设计(1/44)VB支持自定义数据类型 , 在某程序中我们定义了如下类型 Type Studentnumber As string name As String age As IntegerEnd Type针对上述定义 , 如下几项用法正确的是 :( ) 正确答案： B?AS= 张三 ?BDim s As Student? 张红 C?Dim s As Type Student = 张三 DDim s As Type = 张三 (2/44)? 以下能够触发文本框 Change 事件的操作是 ( ) 正确答案： D?A?文本框

2、失去焦点B?文本框获得焦点C?设置文本框的焦点D改变文本框的内容(3/44)? 下面程序运行后输出的结果是 ( ) 正确答案： BDIM C1,C2C1=CHINA C2=STRING$(2, C1) PRINT Left(C1,1) + C2 移除错题?ACHI?B?CCCC?INADAAA(4/44)? 设窗体上有一个文本框 , 名称为 text1, 程序运行后 , 要求该文本框不能 接受键盘输入 , 但能输出信息 , 以下属性设置正确的是 : 正确答案： B?A?text1.maxlength=0B?text1.enabled=flaseC?text1.visible=flaseDtex

3、t1.width=0(5/44)用于返回窗体可用区域宽度的属性是 ( ) 正确答案： A?A ScaleWidth?B ScaleLeft?C ScaleHeight?D ScaleTop(6/44)Visual Basic 提供的 On Error Resume next 错误陷阱语句表示 ( ) 正 确答案： C?A?当发生错误时，使程序转跳到语句标号为0 的程序块B?当发生错误时，不使用错误处理程序块C?当发生错误时，忽略错误行，继续执行下一语句D当发生错误时，终止本过程执行，继续执行下一过程(7/44)为了检测到用户按下键盘上的所有键 , 应该使用的键盘事件为 ( ) 正确答案： C?

4、AMouseUp(8/44)当一个复选框被选中时 , 它的 Value 属性的值是 ( ) 正确答案： C?A(9/44) 通用对话框控件和文件列表框控件中 , 都能根据文件的类型对要显示 的文件进行筛选过滤 , 后者使用 ( ) 属性进行该项设置。 正确答案： A?AFileName(10/44)语句 DIM ARRAY(0 to 3,4,1 to 6) 中定义的数组有 ( ) 个元素。 正确答 案：C?C把 MsgBox的返回值转换为数值应该使用的函数是 ( ) 正确答案： D11/44)Val(12/44) 用于设置通用对话框控件显示文件类型的属性是 ( ) 正确答案： A?AFilte

5、r?BPath?CPartern?DFoleName(13/44) 在窗体上放置一个命令按钮 , 名称为 Command。1单击命令按钮时 , 执行 如下事件过程 :Private Sub Command1_C1ick() a$=software and hardware b$=Right(a$,8) c$=Mid(a$,1,8) Msgbox a$,b$,c$,1End Sub 则在弹出的信息框的标题栏中显示的信息是 ( ) 正确答案： D?A softWare and hardware?B software?Chardwafe?D出现错误(14/44) 下列关于窗体上控件的基本操作错误的是

6、 正确答案： A列关于属性设置的叙述错误的是 : 正确答案： A?A?下一次 DEL键只能删除一个控件 B?按下一次 DEL键可以同时删除多个控件C?按住 SHIFT 键，然后单击每个要选择的控件，可以同时选中多个控件 D按住 ALT 键，然后单击每个要选择的控件，可以同时选中多个控件?A?一个控件具有什么属性是 VB预先设计好的，用户不能改变B?一个控件具有什么属性是 VB预先设计好的，用户可以改变C?一个控件的属性即可以在属性窗口中设置，也可以用程序代码设置D一个控件的属性在属性窗口中设置，还可以利用程序代码为其设置新值(15/44)(16/44)对于复选框控件 chkBoy, 如果在程序

7、中设置它为选中状态 , 下面语句正确的是 ( )?移除错题 正确答案： D?A?chkBoy.Checked = true B?chkBoy.Value = true C?chkBoy.Selected = true DchkBoy.Value = 1 (17/44)? 一个对象所能做的事情称为对象的 ( ) 正确答案： D?AHScroll1 的滚动条 , 其 Min 和 Max属性分别为 0和 100。程序运行后 , 如果移 动滚动框 ,则在文本框中显示滚动条的当前值 , 以下能实现上述操作的程序段 是 ()正确答案： A?A?Private Sub HScroll_Change()Tex

8、t1.Text=HScroll1.ValueEnd SubB?Private Sub HScroll_Click()Text1.Text=HScroll1.ValueEnd SubC?Private Sub HScroll_Change()Text1.Text=HScroll.CaptionEnd SubDPrivate Sub HScroll_Click()Text1.Text=HScroll.CaptionEnd Sub(19/44)设 x=4,y=8,z=7, 表达式 xz) Or zx 的值是 /x的值是 正确答案： D?A(20/44)在程序中,使用InputBox 函数可以接受用户

9、的输入 ,如果要把它的返回 值转换为数值型的数据 , 应该使用的函数是 ( ) 正确答案： A动态数组因为在程序运行前无法确定数组的大小 , 所以经常根据程序的运行情况 对数组进行重新定义 , 以下关于 VB中动态数组的叙述中不正确的是 ( )正确答案： B?A?可以用 ReDim语句重新定义动态数组，并且可以进行多次重定义B?首次用 Dim 进行动态数组声明的时候，必须指明它的类型和上下界 C?Preserve 为 ReDim 语句的可选参数，用于保留动态数组原来的内容 D当对动态数组使用 Erase 语句进行释放操作时，将释放其内存(22/44)?在运行时,按TAB键跳过了一个可以获得焦点

10、的控件 (如文本框), 则可能是因为 ( ) 正确答案： D?A?该控件的 TABSTOP属性值为 TRUE B?该控件的 TABINDEX属性值为 FALSE C?该控件的 ENABLED属性值为 TRUE D该控件的 ENABLED属性值为 FALSE(23/44)? 变量未赋值时 , 数值型变量的值为 ( ) 正确答案： A?A0B正确答案： C(25/44)以下关于 MsgBox的叙述中 , 错误的是 ( ) 正确答案： D?AMsgBox函数返回一个整数B通过 MsgBox函数可以设置信息框中图标和按钮的类型(27/44)在窗体上画一个名称为 Command的1 命令按钮 , 然后编

11、写如下事件过程 Private Sub Command1_Click()x=InputBox(Input)Select Case xCase 1,3Print 分支 1Case Is 4Print 分支 2Case ElsePrint Else 分支 End SelectEnd SubVB应用程序的运行模式是 ( ) 正确答案： C程序运行后 ,如果在输入对话框中输入 2, 则窗体上显示的是 ( ) 正 确答案： C?A?解释运行模式B?编译运行模式C?两者都有D汇编模式(28/44)(29/44)设菜单中有一个菜单项为“ Open”。若要为该菜单命令设计访问键 ,即按下 Alt 及字母 O时

12、,能够执行“ Open”命令,则在菜单编辑器中设置“ Open”命令的方 式是 ( )正确答案： A?A把 Caption 属性设置为 &Open ?B把 Caption 属性设置为 O&pen ?C把 Name属性设置为 &Open?D把 Name属性设置为 O&pen(30/44)运行时 , 当用户向文本框输入新的内容 , 或在程序代码中对文本框的 TEXT属性进 行赋值从而改变了文本框的 TEXT属性值时 ,将触发文本框的 ( ) 事件。正确答案： D?A单击一次工具箱中的控件图标，只能在窗体上画出一个相应的控件?B按住 CTRL键后单击一次工具箱中的控件图标， 可以在窗体上画出多个相同

13、类型的控 件?C 双击工具箱中的控件图标，所画控件的大小和位置是固定的?D 不合用工具箱中的控件工具，不可以在窗估上画出图形对象，但可以写入文字字符 (32/44)以下( ) 程序段可以实施 X、Y变量值的变换 ( ) 正确答案： C?A(33/44)决定标签 (Label) 显示的属性是 ( ) 正确答案： C?A点击滚动条的箭头，可以改变它的 value 值，从而引发 Change 事件 ?B拖动滚动框，可以触发 Scroll 事件?C 通常，水平滚动条的值从左向右递增，垂直滚动条的值自上而下递增?D 拖动滚动框，可以触发 Change 事件，而且是连续触发的(35/44) 在运行阶段 ,

14、 要在文本框 TEXT1获得焦点时选中文本框中所有内 容,对应的事件过程是 ( ) 正确答案： A?APrivate Sub Text1_GotFocus( ) Text1.SelStart=0 Text1.Sellength=Len(Text1.Text) End Sub?B Private Sub Text1_LostFocus( ) Text1.SelStart=0 Text1.Sellength=Len(Text1.Text) End Sub?C Private Sub Text1_Change( ) Text1.SelStart=0 Text1.Sellength=Len(Text1

15、.Text) End Sub?DPrivate Sub Text1_SetFocus( ) Text1.SelStart=0 Text1.Sellength=Len(Text1.Text) End Sub(36/44)一个工程中包含两个名称分别为 Form1、Form2的窗体, 一个名称为 mdlFunc 的标准模块。假定在 Form1、Form2和 mdlFunc 中分别建立了自定义 过程,其定义格式为 : 正确答案： BForm1中定义的过程 :Private Sub frmfunction1()End SubForm2中定义的过程 :Public Sub frmfunction2()En

16、d SubmdlFunc 中定义的过程 :Public Sub mdlFunction()End Sub 在调用上述过程的程序中 ,如果不指明窗体或模块的名称 , 则以下叙述中正确的 是 ( )?A?上述三个过程都可以在工程中的任何窗体或模块中直接被调用B?只有 mdlFunction 过程能够被工程中各个窗体或模块直接被调用 Cfrmfunction1 只能在 form1 中调用，而 frmfunction2 则可以在所有模块或窗体中?被直接调D上述三个过程都只能在各自被定义的模块中直接调用(37/44)计时器 (Timer) 控件用于每隔一段时间自动触发一次 Timer 事件 , 可以 有规律地重复执行一段程序 ,它用于设置两次事件时间间隔的属性是 ( ) 正确 答案： A?A(38/44) 为了防止用户随意将光标置于控件上 , 应( ) 正确答案： D?A 将控件的 TABINDEX属性设置为 0?B将控件的 TABSTOP属性设置为 TRUE ?C将控件的 TABSTOP属性设置为 FALSE ?D将控件的 ENABLED属性设置为 FALSE (39/44)为了使用通用对话框进行打开文件的操作 , 应将通用对话框的 Action 属性设定为 ( ) 正确答案：