(10)设有表示学生选课的三张表,学生S(学号,姓名,性别,年龄,身份证号),课程 C(课号,课名),选课SC(学号,课号,成绩),则表SC的关键字(键或码)为()。 A)课号,成绩 B)学号,成绩 C)学号,课号 D)学号,姓名,成绩 (11)以下叙述中错误的是()。 A)标准模块文件的扩展名是bas B)标准模块文件是纯代码文件 C)在标准模块中声明的全局变量可以在整个工程中使用 D)在标准模块中不能定义过程 (12)在 Visual basic中,表达式3*2\5Mod3的值是() A)1 B)0 C)3 D)出现错误提 (13)以下选项中,不合法的Ⅴ sual basic的变量名是() B (14)以下数组定义语句中,错误的是()。 A) Static a(10)As Integer B) Dim c(3 C) Dim d(-10) D)Dim b(0 To 5, 1 To 3)As Integer (15)现有语句:y=If(x>0,xMod3,0) 设x=10,则y的值是()。 B)1 C)3 D)语句有错 (16)为了使文本框同时具有垂直和水平滚动条,应先把 multiline属性设置为True,然后 再把 ScrollBars属性设置为() A)0 C)2 D)3 (17)文本框 TextI的 KeyDown事件过程如下 Private Sub Text 1 Key Down(Key Code As Integer, Shift As Integer) End Sub 其中参数 Key Code的值表示的是发生此事件时 A)是否按下了At键或Ctrl键 B)按下的是哪个数字键 C)所按的键盘键的键码 D)按下的是哪个鼠标键 (18)窗体上有一个名称为 HScroll 1的滚动条,程序运行后,当单击滚动条两端的箭头时, 立即在窗体上显示滚动框的位置(即刻度值)。下面能够实现上述操作的事件过程是 A)Private Sub HScroll 1 Change B)Private Sub HScroll 1 ChangeO Print hscroll value Print hscroll smallChange C) Private Sub HScrolll Scroll D)Private Sub HScrolll Scroll Print hscroll value Print HScroll l SmallChange End Sub End sub 二级Ⅴ isual basic语言程序设计试卷第2页(共10页)二级 Visual Basic 语言程序设计试卷 第 2 页（共 10 页） （10）设有表示学生选课的三张表，学生 S（学号，姓名，性别，年龄，身份证号），课程 C（课号，课名），选课 SC（学号，课号，成绩），则表 SC 的关键字（键或码）为（ ）。 A）课号，成绩 B）学号，成绩 C）学号，课号 D）学号，姓名，成绩 （11）以下叙述中错误的是（ ）。 A）标准模块文件的扩展名是.bas B）标准模块文件是纯代码文件 C）在标准模块中声明的全局变量可以在整个工程中使用 D）在标准模块中不能定义过程 （12）在 Visual Basic 中，表达式 3 *2\5 Mod 3 的值是（ ）。 A）1 B）0 C）3 D）出现错误提示 （13）以下选项中，不合法的 Visual Basic 的变量名是（ ）。 A）a5b B）_xyz C）a_b D）andif （14）以下数组定义语句中，错误的是（ ）。 A）Static a(10) As Integer B）Dim c(3,1 To 4) C）Dim d(-10) D）Dim b(0 To 5, 1 To 3)As Integer （15）现有语句：y=IIf(x>0,x Mod 3,0) 设 x=10，则 y 的值是（ ）。 A）0 B）1 C）3 D）语句有错 （16）为了使文本框同时具有垂直和水平滚动条，应先把 multiLine 属性设置为 True，然后 再把 ScrollBars 属性设置为（ ）。 A）0 B）1 C）2 D）3 （17）文本框 Text1 的 KeyDown 事件过程如下： Private Sub Text 1_KeyDown(KeyCode As Integer, Shift As Integer) … End Sub 其中参数 KeyCode 的值表示的是发生此事件时（ ）。 A）是否按下了 Alt 键或 Ctrl 键 B）按下的是哪个数字键 C）所按的键盘键的键码 D）按下的是哪个鼠标键 （18）窗体上有一个名称为 HScroll 1 的滚动条，程序运行后，当单击滚动条两端的箭头时， 立即在窗体上显示滚动框的位置（即刻度值）。下面能够实现上述操作的事件过程是 （ ）。 A）Private Sub HScroll 1_Change() B）Private Sub HScroll 1_Change() Print HScroll1.Value Print HScroll1.SmallChange End Sub End Sub C）Private Sub HScroll1_Scroll() D）Private Sub HScroll1_Scroll() Print HScroll1.Value Print HScroll1.SmallChange End Sub End Sub