1、江 南 大 学 考- -考试形式开卷（） 、闭卷（） ，在选项上打（）开课教研室 计算机科学与技术 命题教师 钱瑛 命题时间 2019-5-20 程序设计基础 VB期中试卷使用专业、班级 学号 姓名 题 数 一 二 三 四 总 分得 分答题说明：请将答案填写到答题纸上。一、选择题每题 1 分，共计 42 分；1. 在 Visual Basic 集成环境中，可以列出工程中所有模块名称的窗口是（）A. 工程资源管理器窗口 B. 窗体设计窗口 C. 属性窗口 D. 代码窗口2. 在设计阶段，当按 Ctrl + R 键时，所打开的窗口是（）A. 工程资源管理器窗口 B. 工具箱窗口 C. 属性窗口 D
2、. 代码窗口3. VB 应用程序设计的一般步骤是（） 。A. 分析设计界面编码测试 B. 界面设计编码分析文档C. 分析界面编码设计测试 D. 界面编码测试分析文档4. 以下说法中，正确的是（）A. 对象的运行态属性不出现在对象属性窗口中 B. 属性值只能在属性窗口中设置C. 在程序中可以用赋值语句给对象的任何一个属性赋值D. 属性是对象的特征，所有的对象都有相同的属性5. 以下叙述中错误的是（）。A. 在 Visual Basic 的窗体中，一个命令按钮是一个对象B. 事件是能够被对象识别的状态变化或动作C. 事件都是由用户的键盘操作或鼠标操作触发的 D. 不同的对象可以具有相同的方法6.
3、以下描述中错误的是（） 。A. 多窗体应用程序中每个窗体作为一个磁盘文件保存B. 多窗体应用程序的启动窗体可以在设计时设定C. 在多窗体应用程序中，可以有多个当前窗体 D. 多窗体应用程序可以编译生成一个 EXE文件7. 以下关于多窗体的叙述中，正确的是（） 。 A. 只有第一个建立的窗体才是启动窗体B. 向一个工程添加多个窗体，存盘后生成一个窗体文件C. 打开一个窗体时，其他窗体自动关闭 D. 任何时刻，只有一个当前窗体8. 可以设置为 VB 程序运行启动对象的是（） 。工程文件 任意一个窗体 窗体模块中的 Main()过程 标准模块中的 Main()过程本题得分试 卷 专 用 纸- -使用
4、学期 10-11-02 总张数 12（2 张答卷纸） 教研室主任审核签字 张桂珠 A. B. C. D. 江 南 大 学 考- -9. 以下说法中，错误的是（） 。A. 以.frm 为扩展名的文件是窗体模块文件 B. 以.bas 为扩展名的文件是标准模块文件C. 窗体模块文件包含该窗体及其窗体上相关控件的属性信息D. 标准模块文件由事件过程、通用过程等内容组成10. 以下叙述中错误的是（） 。A. .vbp 文件是工程文件，一个工程可以包含.bas 文件B. .vbg 文件是工程组文件，一个工程组可以由多个工程组成C. .vbp 文件是工程文件，一个工程可以包含多个.frm 文件组成D. .f
5、rm 文件是窗体文件，一个窗体可以包含 .bas 文件11. 以下叙述中正确的是（） 。A. 窗体及窗体上所有控件的事件过程代码都保存在窗体文件中B. 在工程中只有启动窗体可以建立菜单 C. 窗体名称必须与窗体文件的名称相同D. 程序一定是从某个窗体开始执行的12. 以下关于窗体的叙述中错误的是（）。A. 程序运行期间，可以改变 Name 属性值 B. 窗体的 Name 属性用于标识一个窗体C. 运行程序时，改变窗体大小，能够触发窗体的 Resize 事件D. 窗体的 Enabled 属性为 False 时，不能响应单击窗体的事件13. 以下描述中错误的是（） 。A.窗体的标题通过其 Capt
6、ion 属性设置 B.窗体的名称（Name 属性）可以在运行期间修改C.窗体的背景图形通过其 Picture 属性设置 D.窗体最小化时的图标通过其 Icon 属性设置14. 窗体 Form1 上有一名称为 Command1 的命令按钮，以下对应窗体单击事件的事件过程是（） 。A. Private Sub Form1_Click()End SubC. Private Sub Command1_Click()End SubB. Private Sub Form_Click()End SubD. Private Sub Command_Click()End Sub15. 假定编写了如下 4 个窗体
7、事件的事件过程，则运行应用程序并显示窗体后，已经执行的事件过程是（） 。A. Click B. Load C. LostFocus D. KeyPress16. 若在程序运行时，需要将焦点主动设置到指定的对象上，应调用该对象的（）方法。A. Move B. SetFocus C. Refresh D. Drag17. 下列语句中，错误的是（） 。A. Label1.Caption = “Hello“ B. Command1.Caption = “Hello“C. Text1.Caption = “Hello“ D. Frame1.Caption = “Hello“18. 为了使标签具有“透明”
8、的显示效果，需要设置的属性是（） 。A. Caption B. Alignment C. BackStyle D. AutoSize江 南 大 学 考- -19. 为了使标签能自动调整大小以显示标题（Caption 属性）的全部文本内容，应把该标签的（）属性设置为 True。A. AutoSize B. Alignment C. AutoRedraw D. Stretch20. 假定一个滚动条的 LargeChange 属性值为 100，则 100 表示（） 。A. 单击滚动条箭头和滚动框之间某位置时滚动框位置的变化量 B. 滚动框位置的最大值C. 拖动滚动框时滚动框位置的变化量 D. 单击滚
9、动条箭头时滚动框位置的变化量21. 设窗体上有一个名称为 HS1 的水平滚动条，如果执行了语句：HS1.Value = (HS1.Max - HS1.Min) / 2 + HS1.Min 则（） 。A. 滚动条处于最左端 B. 滚动条处于最右端 C. 滚动条处于中间位置D. 滚动条可能处于任何位置，具体位置取决于 Max、Min 属性值22. 设窗体上有一个名为 List1 的列表框，并编写下面的事件过程：Private Sub List1_Click()Dim ch As Stringch = List1.List(List1.ListIndex)List1.RemoveItem List1
10、.ListIndexList1.AddItem chEnd Sub程序运行时，单击一个列表项，则产生的结果是（） 。A. 该列表项被移动到列表的最前面 B. 该列表项被删除C. 该列表项被移动到列表的最后面 D. 该列表项被删除后又在原位置插入23. 窗体上画一个名称为 List1 的列表框，列表框中显示若干城市的名称。当单击列表框中的某个城市名时，该城市名消失。下列在 List_Click 事件过程中能正确实现上述功能的语句是（） 。A. List1.RemoveItem List1.Text B. List1.RemoveItem List1.ClearC. List1.RemoveIte
11、m List1.ListCount D. List1.RemoveItem List1.ListIndex 24. 若要引用列表框 List1 中最后一个数据项的内容，应使用（） 。A. List1.List(List1.Count) B. List1.TextC. List1.ListIndex D. List1.List(List1.Count - 1)25. 窗体上有一名称为 Cb1 的组合框，程序运行后，为了输出选中的列表项，应使用的语句是（） 。A. Print Cb1.Selected B. Print Cb1.List(Cb1.ListIndex)C. Print Cb1.Sel
12、ected.Text D. Print Cb1.List(ListIndex)26. 若要获得组合框中输入的数据，可使用的属性是（） 。 A. Listindex B. Text C. Caption D. List27. 列表框中的项目保存在一个数组中，这个数组的名字是（） 。A. Column B. Style C. MultiSelect D. List28. 为了在窗体上建立 2 组单选按钮，并且当程序运行时，每组都可以有一个单选按钮被选中，则以下做法中正确的是（） 。江 南 大 学 考- -A. 把这 2 组单选按钮设置为名称不同的 2 个控件数组 B. 使 2 组单选按钮的名称分别
13、相同C. 使 2 组单选按钮的 Index 属性分别相同 D. 把 2 组单选按钮分别画到 2 个不同的框架中试 卷 专 用 纸- -29. 窗体上有一个名为 Command1 的命令按钮和一个名为 Timer1 的计时器，并有下面的事件过程：Private Sub Form_Load()Timer1.Interval = 10Timer1.Enabled = FalseEnd Sub程序运行时，单击命令按钮，则产生的结果是（） 。Private Sub Command1_Click()Timer1.Enabled = TrueEnd SubPrivate Sub Timer1_Timer()
14、Command1.Left = Command1.Left + 10End SubA. 命令按钮每 10 秒向左移动一次 B. 命令按钮每 10 毫秒向右移动一次C. 命令按钮每 10 毫秒向左移动一次 D. 命令按钮每 10 秒向右移动一次30. 如果一个直线控件在窗体上呈现为一条垂直线，则可以确定的是（）A. 它的 Y1、Y2 属性的值相等 B. 它的 X1、X2 属性的值相等C. 它的 X1、Y1 属性的值分别与 X2、Y2 属性的值相等D. 它的 X1、X2 属性的值分别与 Y1、Y2 属性的值相等31. 以下说法中正确的是（）A. MouseUp 事件是鼠标向上移动时出触发的事件B.
15、 MouseUp 事件过程中的 x，y 参数用于修改鼠标位置C. 在 MouseUp 事件过程中可以判断用户是否使用了组合键D. 在 MouseUp 事件过程中不能判断鼠标的位置32. 以下关于菜单设计的叙述中错误的是（） 。 A. 各菜单项可以构成控件数组 B. 每个菜单项可以看成是一个控件C. 设计菜单时，菜单项的“有效”不选，即“有效(E)”。表示该菜单项不显示 D. 菜单项只响应单击事件33. 设菜单编辑器中各菜单项的属性设置如下表所示：序号 标题 名称 复选 有效 可见 内缩符号1 File File 无2 Open OpenFile 13 Save SaveFile 14 Exit
16、 EndOfAll 15 Help ShowHelp 1针对上述属性设置，以下叙述中错误的是（）A. 属性设置有误，存在“标题”与“名称”重名现象 B. 运行程序，序号为“3”的菜单项不显示C. 运行程序，序号为“4”的菜单项不可用 D. 运行程序，序号为“5”的菜单项前显示“”34. 下列关于菜单的说法中，错误的是（） 。A. 只有当代码窗口为当前活动窗口时，才能打开菜单编辑器B. 除了 Click 事件之外，菜单项不能响应其他事件 C. 菜单项的快捷键不能任意设置D. 菜单的名称项（Name 属性）不可缺省江 南 大 学 考- -35. 以下关于弹出式菜单的叙述中，错误的是（） 。 A.
17、弹出式菜单在菜单编辑器中建立 B. 一个窗体只能有一个弹出式菜单C. 弹出式菜单的菜单名（主菜单项）的“可见”属性通常设置为 False D. 弹出式菜单通过窗体的 PopupMenu 方法显示36. 假定已经在菜单编辑器中建立了窗体的弹出式菜单，其顶级菜单项的名称为 a1，其“可见”属性为 False。程序运行后，单击鼠标左键或右键都能弹出菜单的事件过程是A. Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _X As Single, Y As Single)If Button = 1 And Button =
18、2 Then PopupMenu a1End SubB. Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _X As Single, Y As Single)PopupMenu a1End SubC. Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _X As Single, Y As Single)If Button = 1 Then PopupMenu a1End SubD. Private Sub Form_MouseDown(B
19、utton As Integer, Shift As Integer, _X As Single, Y As Single)If Button = 2 Then PopupMenu a1End Sub37. 窗体上有一个名称为 CD1 的通用对话框，一个名称为 Command1 的命令按钮，并有如下事件过程。运行上述程序，如下叙述正确的是（） 。Private Sub Command1_Click()CD1.DefaultExt = “doc“CD1.FileName = “VB.txt“CD1.Filter= “All(*.*)|*.*|Word|*.Doc|“CD1.FilterIndex
20、 = 1CD1.ShowSaveEnd SubA. 打开的对话框中文件“保存类型”框中显示“All(*.*)” B. 实现保存文件的操作，文件名是VB.txtC. DefaultExt 属性与 FileName 属性所指明的文件类型不一致，程序出错D. 对话框的 Filter 属性没有指出 txt 类型，程序运行出错38. 在窗体上画一个名称为 CD1 的通用对话框，并有如下程序：Private Sub Form_Load()CD1.DefaultExt = “doc“CD1.FileName = “c:files.txt“CD1.Filter = “应用程序(*.exe)|*.exe“End
21、 Sub程序运行时，如果显示了“打开”对话框，在“文件类型”下拉列表中的默认文件类型是（） 。A. 应用程序(*.exe) B. .docC. .txt D. 不确定试 卷 专 用 纸- -39. 以下关于通用对话框的叙述中，错误的是（） 。A. 若没有指定 InitDir 属性值，则起始目录为当前目录B. 用一个通用对话框控件可以建立几种不同的对话框C. FilerTitle 属性指明了文件对话框中所选择的文件名D. 文件对话框用属性 FilerIndex 指定默认过滤器，它是一个从 0 开始的整数40. 下列可作为 Visual Basic 变量名的是（） 。A. A#A B. 4ABC
22、C. ?xy D. Print_Text 41. 以下合法的 VB 变量名是（）。A. case B. name10 C. t-name D. x*y42. 设有如下变量声明语句：Dim a, b As Boolean ，则下面叙述中正确的是（） 。A. a 和 b 都是布尔型变量 B. a 是变体型变量， b 是布尔型变量C. a 是整型变量，b 是布尔型变量 D. a 和 b 都是变体型变量43. 表达式 Int(Rnd(0)*50)所产生的随机数范围是（）。A. 【0, 50】 B. 【 1, 50】 C. 【0, 49】 D. 【1, 49】44. 下面可以产生 2030（含 20 和
23、 30）的随机整数的表达式是（） 。A. Int(Rnd*10+20) B. Int(Rnd*20+30) C Int(Rnd*11+20). D. Int(Rnd*30+20)45. 下列表达式中，不能将一个 4 位整数 N 的百位数字提取出来的是（） 。A. N 100 Mod 10 B. N 10 Mod 100 C. Mid(CStr(N), 2, 1) D. (N Mod 1000) 10046. 表达式 3*52 Mod 233 的值是（） 。A. 2 B. 5 C. 6 D. 1047. 设 x 是小于 10 的非负数。对此陈述，以下正确的 VB 表达式是（）。A. 0x=0 a
24、nd x=0 or x b Xor c 2 * b Or a = c And b dA. -1 B. 1 C. True D. False50. 设 x=5，执行语句 Print x=x+10，窗体上显示的是（）。A. 15 B. 5 C. True D. False51. 若设 X=1，Y=2，则不能在窗体上显示出“A=3”的语句是（）A. Print A = X+Y B. Print “A=“; X+Y C. Print “A=“ + Str(X+Y) D. Print “A=“ & X+Y52. 设 x = 3.3，y = 4.5，表达式 x - Int(x) + Fix(y)的值是（）
25、A. 4.3 B. 4.8 C. 3.5 D. 4.753. 下列有关转换函数的说法中，正确的是（） 。A. Int 和 Cint 函数的区别仅在于结果的数据类型不同B. Int 和 Fix 函数将非整数数据转换成整数，转换后的结果类型是 LongC. Cint 函数的功能是将其他类型的数据转换成 Integer 类型D. 在处理负数时，Int 和 Fix 函数的结果是相同的试 卷 专 用 纸- -54. 分别执行以下语句，输出结果为 True 的是（）A. Print CInt(4.5) Int(4.5) B. Print CInt(-4.5) Fix(-4.5)C. Print CInt(
26、-4.5) Int(-4.5) D. Print CInt(4.5) Fix(4.5)55. 在窗体上画两个名称分别为 Text1、Text2 的文本框。Text1 的 Text 属性为“Database” 。现有如下事件过程，运行程序，在文本框 Text1 中原有字符之前输入 a，Text2 中显示的是（） 。Private Sub Text1_Change()Text2.Text = Mid(Text1, 1, 5)End Sub A. DataA B. DataB C. aData D. aBase56. 设 x 为字符型变量，n 为整型变量，以下关于 Mid 函数的说法中，错误的是（）
27、A. Mid(x, n)表示从字符串 x 的第 n 个位置开始向右取所有字符B. 若 x = “xyz“，执行语句 Mid(x, 1, 2) = “ab“后，x 的值为“abz“C. Mid(x, n, 1)的取值与 Left(x, n)的取值相同D. 使用 Mid 函数可提取字符串中指定位置、指定个数的字符57. 设有字符串变量 s，其值为“abcd”，可将 s 的值替换为“aabcd” 的语句是（） 。A. Left(s, 1) = “aa“ B. s = “aa“ & Right(s, Len(s) - InStr(s, “a“) C. s = “aa“ & Mid(s, InStr(s
28、, “aa“) D. Mid(s, 1, 2) = “aa“58. 表达式 InStr(4, “abcabca“, “c“) + Int(2.5)的值为（）A. 7 B. 8 C. 5 D. 959. 数学表达式 对应的 VB 表达式是（）)sin(yxy2A. Sqr(x + y) - Sin(Abs(y 2 * x) / (x - y) B. Sqr(x + y) - Sin(Abs(y 2 * x) / x - y)C. Sqr(x + y) - Sin(|y 2 * x|/ (x - y) D. Sqr(x + y) - Sin(|y 2 * x| / x - y)60. 对应数学表达
29、式 的 VB 表达式是（） 。neySi x1003log)(A. Sin(30 * 3.14159 / 180) + Abs(x 2 + Sqr(y) + Exp(x) - Log(n) / Log(10)B. Sin(30) + Abs(x 2 + Sqr(y) + e x - Log(n) / Log(10)C. Sin(30 * 3.14159 / 180) + Abs(x 2 + Sqr(y) + Exp(x) - Log(n) D. Sin(30) + Abs(x 2 + Sqr(y) + e x - Log(n)61. 窗体上有一个名称为 Label1 的标签和一个名称为 Command1 的命令按钮。命令按钮的单击事件过程如下。运行程序，单击命令按钮，在输入对话框中分别输入 2、3，Private Sub Command1_Click()x = InputBox(“输入 x：“, , 0)y = InputBox(“输入 y：“, , 0)Label1.Caption = x + yEnd Sub运行的结果是（）A. 程序运行有错误，数据类型不匹配B. 程序运行有错误，InputBox 函数的格式不对C. 在 Label1 中显示 5江 南 大 学 考- -D. 在 Label1 中显示 23
