一、选择题

　　1

　　设有如图所示窗体和以下程序：

　　Private Sub Co mmand1_Click()

　　Text1.Text ="Visual Basic"

　　End Sub

　　Private Sub Text1_LostFocus()

　　If Text1.Text <>"BASIC"Then

　　Text1.Text =""

　　Text1.SetFocus End If

　　End Sub

　　程序运行时，在Text1文件框中输入"Basic"(如图所示)，然后单击Co mmand1按钮，则产生的结果是( )。

　　A. 文本框中无内容，焦点在文本框中

　　B. 文本框中为"Basic"，焦点在文本框中

　　C. 文本框中为"Basic"，焦点的按钮上

　　D. 文本框中为"Visual Basic"，焦点的按钮上

　　参考答案:A 系统解析:LostFocus 事件是当光标离开当前文本框或鼠标选择其他对象时触发的事件;SetFocus 是将使焦点移到文本框中;本题程序的含义是单击按钮，触发单击事击，在文本框中写入"Visual Basic"，此时的光标不在文本框中，就是触发LostFocus 事件，If 语句检查文本框的中内容不等于"BASIC"，于是置空文本框，再使光标(焦点)移到文本框中。

　　2

　　下列描述不正确的是(　　)。

　　A. 某个子过程中声明的局部变量，其使用范围仅限定于该子过程内

　　B. 某个子过程中声明的局部变量，其生命周期仅限于该子过程被执行过程中

　　C. 不同子过程中的局部变量可以具有相同的名称

　　D. 不同子过程中具有相同的名称的局部变量是同一变量

　　参考答案:C 系统解析:在子过程中声明的变量叫局部变量，其作用范围仅限于该过程内，其生命周期是子过程执行过程;不同子过程中的局部变量可以同名，不会相互影响，子过程中没有声明就使用的变量，除非在子过程外部有声明，否则也认为是局部变量。

　　3

　　以下程序段的输出结果为(　　)。

　　Di ma(10)，p(3)

　　k =5

　　For i =0To 10

　　a(i)=i

　　Next i

　　For i =0To 2

　　p(i)=a(i +(i +1))

　　Next i

　　For i =0To 2

　　k =k +p(i)+2

　　Next i

　　Print k

　　A. 20

　　B. 21

　　C. 56

　　D. 32

　　参考答案:A 系统解析:本题首先对a(i)赋值为i ，然后利用a(i)对p 赋值，p(0)=a(1)=1，p(1)=a(3)=3，p(2)=a(5)=5，最后k =13+5+2=20。

　　4

　　不能脱离控件(包括客体)而独立存在的过程是(　　)。

　　A. 事件过程

　　B. 通用过程

　　C. Sub过程

　　D. 函数过程

　　参考答案:A 系统解析:Visual Basic 对象具有属性、方法和事件。属性是描述对象的数据;方法告诉对象应做的事情;事件是对象所产生的事情，事件发生时可以编写代码进行处理。Visual Basic 的窗体和控件是具有自己的属性、方法和事件的对象。可以把属性看做一个对象的性质，把方法看做对象的动作，把事件看做对象的响应。由此可以看出，事件过程是属于对象的，不能独立存在。

　　5

　　窗体上添加一个文本框Textl ，编写下列代码：

　　Private Sub Textl_KeyDown(KeyCode As Integer ，ShiftAs Integer)

　　Print Chr(KeyCode +51&KeyCode)

　　End Sub

　　程序运行时，在文本框中输入"ab"，则在窗体上输出为(　　)。

　　A. F65

　　G66

　　B. F65

　　F66

　　C. G66

　　F65

　　D. G65

　　G66

　　参考答案:A 系统解析:KeyDown 事件返回键盘上的键，如按下字母"A"或者字母键"a"，KeyCode 码都为65，所以按下小写字母a 和b 后，KeyCode 值分别为65和66，KeyCode +5的值分别为70和71，对应的字母分别为F 和G，所以打印输出F65和G66。

　　6

　　执行如下两条语句后，窗体上显示的是(　　)。 a=9·8596 Print Format(a，"$00，00·00")

　　A. 0，009·86

　　B. $9·86

　　C. 9·86

　　D. $0，009·86

　　参考答案:D 系统解析:Format$(数值表达式、格式字符串)，该函数的功能是：按"格式字符串"指令的格式输出"数值表达式"的值。本题将a 按照"$00，00.00"的格式输出，结果为："$0，009.86"。

　　7

　　在窗体上画一个命令按钮和一个标签，其名称分别为Co mmand1和Labell ，然后编写如下事件过程：

　　Private Sub Co mmand1_Click()

　　Counter =0

　　For i =1To 4

　　For j=6To 1Step -2

　　Counter =Counter +1

　　Next j

　　Next i

　　Label1.Caption =Str(Counter)

　　End Sub

　　程序运行后，单击命令按钮，标签中显示的内容是(　　)。

　　A. 11

　　B. 12

　　C. 16

　　D. 20

　　参考答案:B 系统解析:For -循环也称为For…Next 循环或计数循环。其一般格式如下：

　　For 循环变量=初值To 终值[step 步长][循环体][Exit For]Next[循环变量]执行过程中，循环次数=Int((终值一初值)/步长)+1本题实质是判断For 循环的执行次数，在这个嵌套的For 循环中，内循环的执行次数为Intq((1-6)/-2)+1=3，外循环的执行次数为4，故内循环循环体执行次数为4*3=12。

　　8

　　窗体上有一个名称为Frame1的框架，如下图所示，若要把框架上显示的"Frame1"改为汉字"框架"，下列正确的语句是(　　)。

　　A. Frame1.Name ="框架"

　　B. Frame1.Caption ="框架"

　　C. Frame1.Text ="框架"

　　D. Frame1.Value ="框架"

　　参考答案:B 系统解析:框架(Frame)是一个容器控件，用于将屏幕上的对象分组，其Caption 属性用于设置或返回在其标题栏上显示的文本信息。

　　9

　　以下关于KeyPress 事件过程中参数KeyAscii 的叙述正确的是(　　)。

　　A. KeyAscii 参数是所按键的ASCII 码

　　B. KeyAscii 参数的数据类型为字符串

　　C. KeyAscii 参数可以省略

　　D. KeyAscii 参数是所按键上标注的字符

　　参考答案:A 系统解析:本题考查Visual Basic 的KeyPress 事件过程。在KeyPress 事件中，KeyAscii 参数是所按键的ASCII 码，不可省略，为数值型参数。

　　10

　　设窗体上有一个列表框控件List1，含有若干列表项。下列能表示当前被选中的列表项内容的是(　　)。

　　A. List1.List

　　B. List1.Listlndex

　　C. List1.Text

　　D. List1.Index

　　参考答案:C 系统解析:列表框控件(ListBox)用于提供可做单一或多项选择的列表项，列表框的Text 属性用于返回列表框中选择的项目的内容，返回值总与列表框的List(ListIndex)属性的返回值相同，而列表框的ListIndex 属性只返回当前选择的项目的索引号。