在菜单编辑器中建立1个名称为Menu0的菜单项，将其“可见”属性设置-最需题库

试卷相关题目

1在窗体上画1个命令按钮，名称为Command1，然后编写如下程序：Dim Flag As BooleanPrivate Sub Command1_Click()Dim intNum As IntegerintNum=InputBox("请输入：")If Flag ThenPrint f(intNum)End IfEnd SubFunction f(X As Integer)As IntegerIf X<10 ThenY=XElseY=X+10End Iff=YEnd FunctionPrivate Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single)Flag=TrueEnd Sub运行程序，首先单击窗体，然后单击命令按钮，在输入对话框中输入5，则程序的输出结果为。
A.0
B.5
C.15
D.无任何输出
开始考试点击查看答案
2为了使列表框中的项目呈多列显示，需要设置的属性为。
A.Columns
B.Style
C.List
D.MultiSelect
开始考试点击查看答案
3在窗体上画1个文本框，其名称为Text1，然后编写如下过程：Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer)Print Chr(KeyCode)End SubPrivate Sub Text1_KeyUp(KeyCode As Integer，Shift As Integer)Print Chr(KeyCode+2)End Sub程序运行后，把焦点移到文本框中，此时如果敲击“A”键，则输出结果为。
A.AA
B.AB
C.AC
D.AD
开始考试点击查看答案
4窗体上有名称分别为Text1、Text2的2个文本框，要求文本框Text1中输入的数据小于500，文本框Text2中输入的数据小于1000，否则重新输入。为了实现上述功能，在以下程序中问号(、)处应填入的内容是。Private Sub Text1_LostFocus()Call CheckInput(Text1，500)End SubPrivate Sub Text2_LostFocus()Call CheckInput(Text2，1000)End SubSub CheckInput(t As 、，x As Integer)If Val(t.Text)>x ThenMsgBox"请重新输入!"End IfEnd Sub
A.Text
B.SelText
C.Control
D.Form
开始考试点击查看答案
5以下关于过程的叙述中，错误的是。
A.事件过程是由某个事件触发而执行的过程
B.函数过程的返回值可以有多个
C.可以在事件过程中调用通用过程
D.不能在事件过程中定义函数过程
开始考试点击查看答案
6窗体上有1个名称为CD1的通用对话框，1个名称为Command1的命令按钮。命令按钮的单击事件过程如下：Private Sub Command1_Click()CD1.FileName=""CD1.Filter="All Files|*.*|(*.DoC．|*.Doc|(*.Txt)|*.txt"CD1.FilterIndex=2CD1.Action=1End Sub关于以上代码，错误的叙述是。
A.执行以上事件过程，通用对话框被设置为“打开”文件对话框
B.通用对话框的初始路径为当前路径
C.通用对话框的默认文件类型为*.Txt
D.以上代码不对文件执行读写操作
开始考试点击查看答案
7以下叙述中错误的是。
A.用Shell函数可以执行扩展名为.exe的应用程序
B.若用Static定义通用过程，则该过程中的局部变量都被默认为Static类型
C.Static类型的变量可以在标准模块的声明部分定义
D.全局变量必须在标准模块中用Public或Global声明
开始考试点击查看答案
8以下关于文件的叙述中，错误的是。
A.使用Append方式打开文件时，文件指针被定位于文件尾
B.当以输入方式(Input)打开文件时，如果文件不存在，则建立一个新文件
C.顺序文件各记录的长度可以不同
D.随机文件打开后，既可以进行读操作，也可以进行写操作
开始考试点击查看答案