VB语言程序设计

1、VB语言程序设计(1/44)VB支持自定义数据类型,在某程序中我们定义了如下类型: Type Student     number  As string     name As String     age As IntegerEnd Type· 针对上述定义,如下几项用法正确的是:( ) 正确答案：B· AS="张三"· BDim s  As Student "张红"&#

2、183; CDim s As Type S="张三"· DDim s As T="张三"(2/44)· 以下能够触发文本框Change事件的操作是( ) 正确答案：D· A文本框失去焦点· B文本框获得焦点· C设置文本框的焦点· D改变文本框的内容(3/44)· 下面程序运行后输出的结果是(   )   正确答案：BDIM C1,C2   C1="CHINA"  

3、 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)· 用于

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

5、该使用的键盘事件为( )· 正确答案：C· AKeyPress· BMouseDown· CKeyDown· DMouseUp(8/44)· 当一个复选框被选中时,它的Value属性的值是( ) 正确答案：C· A3· B2· C1· D0(9/44)· 通用对话框控件和文件列表框控件中,都能根据文件的类型对要显示的文件进行筛选过滤,后者使用( )属性进行该项设置。正确答案：A· APattern· BPath· CFilter· DFileNa

6、me(10/44)· 语句DIM ARRAY(0 to 3,4,1 to 6)中定义的数组有( )个元素。正确答案：C· A12· B60· C120· D34511/44)· 把MsgBox的返回值转换为数值应该使用的函数是( ) 正确答案：D· ALog· BStr· CLen· DVal(12/44)· 用于设置通用对话框控件显示文件类型的属性是( ) 正确答案：A· AFilter· BPath· CPartern· DFoleName

7、(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· A

8、softWare and hardware· Bsoftware· Chardwafe· D出现错误(14/44)   下列关于窗体上控件的基本操作错误的是:· 正确答案：A· A下一次DEL键只能删除一个控件· B按下一次DEL键可以同时删除多个控件· C按住SHIFT键，然后单击每个要选择的控件，可以同时选中多个控件· D按住ALT键，然后单击每个要选择的控件，可以同时选中多个控件(15/44)·    下列关于属性设置的叙述错误的是: 正确答案：A·

9、 A一个控件具有什么属性是VB预先设计好的，用户不能改变· B一个控件具有什么属性是VB预先设计好的，用户可以改变· C一个控件的属性即可以在属性窗口中设置，也可以用程序代码设置· D一个控件的属性在属性窗口中设置，还可以利用程序代码为其设置新值(16/44)对于复选框控件chkBoy,如果在程序中设置它为选中状态,下面语句正确的是( )· 移除错题正确答案：D· AchkBoy.Checked = true· BchkBoy.Value = true· CchkBoy.Selected = true· DchkB

10、oy.Value = 1(17/44)· 一个对象所能做的事情称为对象的( ) 正确答案：D· A继承· B属性· C封装· D方法(18/44)·    在窗体上画一个名称为Text1的文本框,然后画一个名称为HScroll1的滚动条,其Min和Max属性分别为0和100。程序运行后,如果移动滚动框,则在文本框中显示滚动条的当前值,以下能实现上述操作的程序段是(   ) · 正确答案：A· APrivate Sub HScroll_Change() Text1.Text=H

11、Scroll1.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/44)· 设x=4,y=8,z=7,表达式

12、xz) Or z<x的值是< p="" style="box-sizing: border-box; margin: 0px; padding: 0px;"></x的值是<>正确答案：D· A1· B-1· CTrue· DFalse(20/44)· 在程序中,使用InputBox函数可以接受用户的输入,如果要把它的返回值转换为数值型的数据,应该使用的函数是( ) 正确答案：A· AVal· BLen· CStr· DLog(21

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

14、案：D· A该控件的TABSTOP属性值为TRUE· B该控件的TABINDEX属性值为FALSE· C该控件的ENABLED属性值为TRUE· D该控件的ENABLED属性值为FALSE(23/44)· 变量未赋值时,数值型变量的值为( ) 正确答案：A· A0· B空· C1· D无任何值(24/44)· 以下语句的输出结果是( ) Print Format$(32548.5, "000,000.00")正确答案：C· A32548.5· B325，4

15、85.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(

16、27/44)在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click()    x=InputBox("Input")    Select Case x      Case 1,3        Print "分支 1"      Case Is >4   

17、0;    Print "分支 2"      Case Else       Print "Else 分支 "    End Select End Sub · 程序运行后,如果在输入对话框中输入2,则窗体上显示的是(   ) 正确答案：C· A分支1· B分支2· CElse分支· D程序出错(28/44)· VB应用程序的运行模式是(

18、 ) 正确答案：C· A解释运行模式· 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)运行时,当用户向文本框输入新的内

19、容,或在程序代码中对文本框的TEXT属性进行赋值从而改变了文本框的TEXT属性值时,将触发文本框的( )事件。· 正确答案：D· ACLICK· BDBLCLICK· CGOTFOCUS· DCHANGE (31/44)· 下列关于控件画法的叙述错误的是( ) 正确答案：D· A单击一次工具箱中的控件图标，只能在窗体上画出一个相应的控件· B按住CTRL键后单击一次工具箱中的控件图标，可以在窗体上画出多个相同类型的控件· C双击工具箱中的控件图标，所画控件的大小和位置是固定的· D不合用工具箱中

20、的控件工具，不可以在窗估上画出图形对象，但可以写入文字字符(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/44)· 决定标签(Label)显示的属性是( ) 正确答案：C· AText· BName· CCaption· DAlignment(34/44)·    关于滚动条控件,下面说法错误的是: 正确答案：D&#

21、183; A点击滚动条的箭头，可以改变它的value值，从而引发Change事件· B拖动滚动框，可以触发Scroll事件· C通常，水平滚动条的值从左向右递增，垂直滚动条的值自上而下递增· D拖动滚动框，可以触发Change事件，而且是连续触发的(35/44)·    在运行阶段,要在文本框TEXT1获得焦点时选中文本框中所有内容,对应的事件过程是( ) 正确答案：A· APrivate Sub Text1_GotFocus( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)

22、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=Len(Text1.Text)End Sub(36/44)· 一个工程中包含

23、两个名称分别为Form1、Form2的窗体,一个名称为mdlFunc的标准模块。假定在Form1、Form2和mdlFunc中分别建立了自定义过程,其定义格式为: 正确答案：B     Form1中定义的过程:     Private Sub frmfunction1()     End Sub     Form2中定义的过程:     Public Sub frmfunction2()     End S

24、ub     mdlFunc中定义的过程:     Public Sub mdlFunction()     End Sub在调用上述过程的程序中,如果不指明窗体或模块的名称,则以下叙述中正确的是( )· A上述三个过程都可以在工程中的任何窗体或模块中直接被调用· B只有mdlFunction过程能够被工程中各个窗体或模块直接被调用· Cfrmfunction1只能在form1中调用，而frmfunction2 则可以在所有模块或窗体中被直接调· D上述三个过程都只

25、能在各自被定义的模块中直接调用(37/44)· 计时器(Timer)控件用于每隔一段时间自动触发一次Timer事件,可以有规律地重复执行一段程序,它用于设置两次事件时间间隔的属性是( ) 正确答案：A· AInterval· BSmallChange· CLargeChange· DMax(38/44)· 为了防止用户随意将光标置于控件上,应( ) 正确答案：D· A将控件的TABINDEX属性设置为0· B将控件的TABSTOP属性设置为TRUE· C将控件的TABSTOP属性设置为FALSE· D将控件的ENABLED属性设置为FALSE