b=3
End Enum
Private Sub Co mmand1_Click()
Di mx As Integer
x=a
If x>=3Then
MsgBox"Pass!"
End Sub
运行程序,其结果是()。
A.运行错误,因为Enum定义有错B.运行错误,因为x=a类型不匹配
C.运行正常结束,不显示任何信息D.运行正常,显示内容为“Pass!”的信息框
D。【解析】Enum是枚举类型的变量,变量定义时都是要执行的,因此x>4,必然满足4>=3,弹出信息框为pass!。
20. 设有如下程序:
Option Base l
Private Sub Form_Click()
Di ma(5)As Stri ng,i As Integer
For i=1To 5
a(i)=Chr(Asc("A")+i)
Call f(a,i)
Next i
End Sub
Sub f(ta()As Stri ng,n As Integer)
Di mi As Integer
For i=1To n
Print ta(i);
Next i Print
End Sub
对上述程序,以下叙述中正确的是()。
A.程序有错,因为在过程f的定义中数组参数格式不正确
B.程序可正常运行,输出内容的第一行是一个字母“A”
C.程序可正常运行,输出内容的第一行是一个字母“B”
D.程序可正常运行,输出内容的第一行是数字65
C。【解析】Chr是Ascii码转成字符,Asc是讲字符转成Ascii码。i是1到5的循环,仍然是一个数。a数组就是B、C、D、E、F这5行字符。第一行是B,程序运行后,5行分别是B,BC,BCD,BCDE,BCDEF。
21. 下列说法中正确的是()。
A.当焦点在某个控件上时,按下一个字母键,就会执行该控件的KeyPress事件过程
B.因为窗体不接受焦点,所以窗体不存在自己的KeyPress事件过程
C.若按下的键相同,KeyPress事件过程中的KeyAscii参数与KeyDown事件过程中的KeyCode参数的值也相同
D.在KeyPress事件过程中,KeyAscii参数可以省略
A。【解析】键盘事件是在对象具有焦点时,按下键盘上的键时触发的事件,常见的有KeyDown、KeyUp和KeyPress。当用户按下并释放一个可打印的键盘字符时,KeyDown、KeyPress、KeyUp事件将依次发生。其中,KeyDown(KeyCode As Integer,Shift as Integer)和KeyUp(KeyCode As Integer,Shift as Integer)有两个参数:KeyCode参数是表示所按键的位置信息的代码(将A和a作为同一个键返回,而从大键盘上输出的1和从右侧小键盘上输入的“1”将被视作不同的字符),Shift参数代表按键时Shift、Ctrl、Alt键的状态;KeyPress(KeyAscii As hateger)事件中KeyAscii参数是所按键的Ascii的代码,该参数不显示键盘的物理状态,而只是传递一个字符。KeyPress将每个字符的大、小写形式作为不同的键代码解释,即作为两种不同的字符。Enter键的Ascii为13。当窗体的KeyPrevie w属性被设置为True时,将在控件的键盘事件之前激活窗体的键盘事件。所谓事件,是由Visual Basic预先设置好的、能够被对象识别的动作。事件过程中的参数是不能省略的。
22. 语句Di ma(-3To 4,3To 6)As Integer定义的数组元素个数是()。