C.通用对话框的默认文件类型为*.txtD.以上代码不对文件执行读写操作
19.以下叙述中错误的是______
A.在程序运行时，通用对话框控件是不可见的
B.在同一个程序中，用不同的方法(如ShowOpen或ShowSave等)打开的通用对话框具有不同的作用
C.调用通用对话框控件的ShowOpen方法，可以直接打开在该通用对话框中指定的文件
End Sub
D. Private Sub Command1_Click()
List1.RemoveItem "重庆"
End Sub
10. 在窗口上有右图所示的控件，各控件的名称与其标题相同，并有如下程序，刚运行程序时，看到的窗体外观是______
Private Sub Form_Load()
Command2.Enabled = False
D.调用通用对话框控件的ShowColor方法，可以打开颜色对话框
20.以下叙述中错误的是______
A.在同一窗体的菜单项中,不允许出现标题相同的菜单项B.程序运行中,可重新设置菜单的Visible属性
C.弹出式菜单也在菜单编辑器中定义D.在菜单的标题栏中“&”所引导的字母指明访问该菜单项的访问键
A.通过Button参数判定当前按下的是哪一个鼠标键B. Shift参数只能用来确定是否按下Shift键
C. Shift参数只能用来确定是否按下Alt和Ctrl键D.参数x,y用来设置鼠标当前位置的坐标
12.在窗体上画有一个名称为Timer1的计时器和一个名称为Label1的标签，计时器的属性设置为Enabled = True，Interval = 0，并编程如下。希望在程序运行时，可每2秒在标签上显示系统当前时间。在程序执行时发现未能实现上述目的，那他应做______修改
34.设a = "MicrosoftVisualBasic"，则以下使变量b的值为“VisualBasic”的语句是______
A. b = Left(a, 10)B. b = Mid(a, 10)C. b = Right(a, 10)D. b = Mid(a, 11, 10)
A.“FontFrame”和“字体”, Form_ClickB.“字体”和“FontFrame”, Form1_Click
C.“Frame1”和“字体”, Form1_ClickD.“Frame1”和“FontFrame”, Form_Click
5.要使一个文本框可以显示多行文本，应设置为True的属性是______
Private Sub Timer1_Timer()
Label1.Caption = Time$
End Sub
A.通过属性窗口把计时器的Interval属性设置为2000
B.通过属性窗口把计时器的Enabled属性设置为False
C.把事件过程中的Label1.Caption = Time$语句改为Timer1.Interval = Time$
Private Sub Command1_Click()
x = InputBox("输入：", "输入整数")
MsgBox "输入的数据是：", , "输入数据：" + x
End Sub
A. x的值是数值10B.输入对话框的标题是“输入整数”
C.信息框的标题是“输入数据：10”D.信息框中显示的是“输入的数据是：”
Check1.Value = 1
End Sub
A. B.
C. D.
11.窗体的MouseDown事件过程有4个参数，关于这些参数，正确的描述是______
Form_MouseDown (Button As Integer, Shift As Integer, X As Single, Y As Single)
17.若窗体上的图片框中有一个命令按钮，则此按钮的Left属性是指______
A.按钮左端到窗体左端的距离B.按钮左端到图片框左端的距离
C.按钮中心点到窗体左端的距离D.按钮中心点到图片框左端的距离
18.窗体上有1个名称为CD1的通用对话框，1个名称为Command1的命令按钮。命令按钮的单击事件过程如下；关于代码，错误的叙述是______
D.把事件过程中的Label1.Caption = Time$语句改为Label1.Caption = Timer1.Time
13.以下叙述中错误的是______
A.在KeyPress事件过程中不能识别键盘的按下与释放
B.在KeyPress事件过程中不能识别回车键
C.在KeyDown和KeyUp事件过程中，将键盘输入的"A"和"a"视作相同的字母(即具有相同的KeyCode)
32.执行如下两条语句，窗体上显示的是______
a=9.8596
Print Format(a,"$00,00.00")
A. 0,009.86B. $9.86C. $00,09.86D. $0,009.86
33.假定有如下的命令按钮（名称为Command1）事件过程；运行程序，单击命令按钮，如果从键盘上输入整数10，则以下叙述中错误的是______
A. 76FalseB. 6.65.6False
C. 76A=6D. 78A=8
29.下列语句运行时，系统给出错误提示的是______
A. Print "1E2" + 8B. Print 3 = 2 = 4C. Print "AB" & 128;D. Print -32000 - 769;
30.语句Print 5/4*6\5 Mod 2的输出结果是______
B.当程序运行时，双击一个窗体，则触发该窗体的DblClick事件
C. VisualBasic应用程序只能以解释方式执行D.事件可以由用户引发，也可以由系统引发
3.以下关于窗体的描述中，错误的是______
A.执行Unload Form1语句后，窗体Form1消失，但仍在内存中
B.窗体的Load事件在加载窗体时发生
《程序设计基础（VB）》试卷
使用专业、班级学号姓名
题 数
一
二
总 分
得 分
本题得分
一、选择题〖每题1分，共计50分〗；
1.在设计阶段，当双击窗体上的某个控件时，所打开的窗口是______
A.工程资源管理器窗口B.工具箱窗口C.代码窗口D.属性窗口
2.以下叙述中错误的是______
A.打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件
24.假设变量BOOL是一个布尔型变量，则下列赋值语句中，正确的是______
A. BOOL = ‘TRUE’B. BOOL = .TRUE.C. BOOL = #TRUE#D. BOOL = 3=y
25.在文本框Text1中输入数字12，在文本框Text2中输入数字34，在输入对话框中输入数字34，执行以下语句，只有______可使文本框Text3中显示46。
A. Text3 = Text1.Text & 34B. Text3.Text = Text1.Text + InputBox("输入")
C. Text3 = Val(Text1.Text) + “34”D. Text3 = Val(Text1.Text) & Val(Text2.Text)
26.设有a=2,b=3,c=4，表达式Not a <= c Or 4 * c = b ^ 2 And b <> a + c的值是______
Text1.Text = "Visual" : Me.Text1 = "Basic"
Text1 = "Program"
End Sub
A. VisualB. BasicC. ProgramD.出错
7.为了把焦点移到某个指定的控件，所使用的方法是______
A. SetFocusB. VisibleC. RefreshD. GetFocus
A. Private Sub Command1_Click()
List1.Clear
End Sub
B. Private Sub Command1_Click()
List1.Clear List1.ListIndex
End Sub
C. Private Sub Command1_Click()
List1.RemoveItem List1.ListIndex
Dim A As Integer, B As Boolean, C As Integer, D As Integer
a = 20 / 3: b = True: c = b: D = a + c
Debug.Print A, D, A = A+C ‘Debug.Print表示将信息打印显示在立即窗口中
End Sub
Private Sub Command1_Click()
cd1.FileName = ቤተ መጻሕፍቲ ባይዱ"
cd1.Filter = "all.files|*.*|(*.doc)|*.doc|(*.txt)|*.txt"
cd1.FilterIndex = 2
cd1.Action = 1
End Sub
A.执行以上事件过程，通用对话框被设置为“打开”文件对话框B.通用对话框的初始路径为当前路径
A. –1B. 1C. TrueD. False
27.设a=4, b=3, c=2,d=1，表达式a > b+1 Or c < d And b Mod c的值是______