(29)在窗体上画1个文本框，其名称为Text1，然后编写如下过程：
　　Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer)
　　Print Chr(KeyCode)
　　End Sub
　　Private Sub Text1_KeyUp(KeyCode As Integer，Shift As Integer)
　　Print Chr(KeyCode+2)
　　End Sub
　　程序运行后，把焦点移到文本框中，此时如果敲击“A”键，则输出结果为。
　　A)A
　　AB)A
　　BC)A
　　CD)A
　　D
(30)为了使列表框中的项目呈多列显示，需要设置的属性为。
　　A．Columns
　　b．Style
　　C．List
　　D．MultiSelect
(31)在窗体上画1个命令按钮，名称为Command1，然后编写如下程序：
　　Dim Flag As Boolean
　　Private Sub Command1_Click()
　　Dim intNum As Integer
　　intNum=InputBox("请输入：")
　　If Flag Then
　　Print f(intNum)
　　End If
　　End Sub
　　Function f(X As Integer)As Integer
　　If X<10 Then
　　Y=X
　　Else
　　Y=X+10
　　End If
　　f=Y
　　End Function
　　Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single)
　　Flag=True
　　End Sub
　　运行程序，首先单击窗体，然后单击命令按钮，在输入对话框中输入5，则程序的输出结果为。
　　A．0
　　b．5
　　C．15
　　D．无任何输出
(32)在菜单编辑器中建立1个名称为Menu0的菜单项，将其“可见”属性设置为False，并建立其若干子菜单，然后编写如下过程：
　　Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)
　　If Button=1 Then
　　PopupMenu Menu0
　　End If
　　End Sub
　　则以下叙述中错误的是。
　　A．该过程的作用是弹出一个菜单
　　B．单击鼠标右键时弹出菜单
　　C．Menu0是在菜单编辑器中定义的弹出菜单的名称
　　D．参数X、Y指明鼠标当前位置的坐标
(33)窗体上有1个名称为CD1的通用对话框，1个名称为Command1的命令按钮。命令按钮的单击事件过程如下：
　　Private Sub Command1_Click()
　　CD1.FileName=""
　　CD1.Filter="All Files|*.*|(*.Do
　　C．|*.Doc|(*.Txt)|*.txt"
　　CD1.FilterIndex=2
　　CD1.Action=1
　　End Sub
　　关于以上代码，错误的叙述是。
　　A．执行以上事件过程，通用对话框被设置为“打开”文件对话框
　　B．通用对话框的初始路径为当前路径
　　C．通用对话框的默认文件类型为*.Txt
　　D．以上代码不对文件执行读写操作
(34)以下叙述中错误的是。
　　A．用Shell函数可以执行扩展名为.exe的应用程序
　　B．若用Static定义通用过程，则该过程中的局部变量都被默认为Static类型
　　C．Static类型的变量可以在标准模块的声明部分定义
　　D．全局变量必须在标准模块中用Public或Global声明
(35)以下关于文件的叙述中，错误的是。
　　A．使用Append方式打开文件时，文件指针被定位于文件尾
　　B．当以输入方式(Input)打开文件时，如果文件不存在，则建立一个新文件
　　C．顺序文件各记录的长度可以不同
　　D．随机文件打开后，既可以进行读操作，也可以进行写操作