2012-2013-1VB期末试卷(A)

江 南 大 学 考 《 程序设计基础VB 》期末考试卷 （A） 使用专业、班级 学号 姓名 题 数 一 二 三 四 总 分 得 分 一、单选题〖每小题1分，共计30分〗 1. 以下叙述中错误的是【 】。 A．事件过程是响应特定事件的一段程序 B．不同的对象可以具有相同名称的方法 C．对象的方法是执行指定操作的过程 D．对象事件的名称可以由编程者指定 2. 在以下有关对象属性的叙述中错误的是【 】。 A．所有对象都具有Name 属性 B．只能在执行时设置或改变的属性为执行时属性 C．对象的某些属性只能在设计时设定，不能使用代码改变 D．Enabled属性值设为False的控件对象在窗体上将不可见 3. 工程中有2个窗体，名称分别为Form1、Form2，Form1为启动窗体。要求程序运行 后单击Form1时显示Form2，则Form1的单击事件应该是【 】。 A.Private Sub Form_Click() B.Private Sub Form_Click() Form2.Show Form2.Visible End Sub End Sub C.Private Sub Form_Click() D.Private Sub Form_Click() Load Form2 Form2.Load End Sub End Sub 4.通过文本框的【 】事件过程可以获取文本框中键入字符的ASCII码值。 A．Change B．GotFocus C．LostFocus D．KeyPress 5. 要使控件与框架捆绑在一起，以下操作正确的是【 】。 A.在窗体不同位置上分别画一框架和控件，再将控件拖到框架上 B.在窗体上画好控件，再画框架将控件框起来 C.在窗体上画好框架，再在框架中画控件 D.在窗体上画好框架，再双击工具箱中的控件 1

考试形式开卷（√ ）、闭卷（），在选项上打（√）

开课教研室 计算机基础部 命题教师 程红 命题时间 2012-12-5

试 卷 专 用 纸 6. 窗体上有名为Option1的单选按钮，则以下语句中与If Option1.Value = True Then不等价的是【 】。 A．If Option1.Value Then B．If Option1 = True Then C．If Value = True Then D．If Option1 Then 7. 下列【 】程序段能删除列表框List1中的所有项。 A．Private Sub Command3_Click() B．Private Sub Command3_Click() For I=0 To List1.ListCount-1 For I=0 To List1.ListCount-1 List1.RemoveItem 1 List1.Removeltem 0 Next I Next I End Sub End Sub C．Private Sub Command3_Click() D．Private Sub Command3_Click() For I=0 To Listl.ListCount-1 For I=0 To Listl.ListCount List1.Removeltem I List1.RemoveItem 0 Next I Next I End Sub End Sub 8. 若看到程序中有以下事件过程，并希望运行后窗体上有文本输出，则可以肯定 的是【 】。 Private Sub Click_MouseDown(Button As Integer, Shift As Integer, _ X As Single, Y As Single) If Button = 2 Then Print \ End Sub A．鼠标右键单击Command1对象，执行此过程 B．鼠标右键单击Click对象，执行此过程 C．鼠标左键单击MouseDown对象，执行此过程 D．鼠标左键单击MouseDown对象，执行此过程 9. 下列符号常量的声明中，【 】是不合法的。 A．Const a As Single=1.1 B. Const a As Integer=\ C．Const a As Double=Sin（1） D．Const a=\ 10. 窗体上放置了3个文本框，若在Text1中输入456，在Text2中输入78，在程序中执行了语句Text3.text = Text1.text + Text2.text后，则在Text3中显示【 】。 A．534 B. 45678 C．溢出 D．语法错误 11. 如果x是一个正实数，对x 的第3位小数四舍五入的表达式是【 】。 A．Int（x+0.005）/100 B．Int（100*（x+0.005））/100 C．Int（x+0.05）/100 D．Int（100*（x+0.05））/100 12. 将任意一个正的两位数N的个位数与十位数对换的表达式为【 】。 A．(N?Int(N/10)*10)*10+Int(N/10) B．N?Int(N)/10*10+Int(N)/10 C．Int(N/10)+(N?Int(N/10)) D．(N?Int(N/10))*10+Int(N/10)

使用学期 2012-2013 -1 s总张数 5 教研室主任审核签字

江 南 大 学 考 13. 下面表达式的值为真的是【 】。 A．Mid (\，1，12)=Right (\，12) B．\C．Int(134.69)>CInt (134.69) D．78.9/32.77<=97.5/43.97 And –45.4>?4.98 14. 下面所列4组数据中，全部正确的Visual Basic常数是【 】。 A．32768，1.34D2，\，&O1767 B．3276，123.56，1.2E-2，#True# C．&HABCE，02-03-2002，False，D-3 D．ABCDE，#02-02-2002#，E-2 15. 以下【 】程序段可以实现x、y变量值的交换。 A．y=x：x=y B．z=x：y=z：x=y C．z=x：x=y：y=z D．z=x：w=y：y=z：x=y 16. 下面【 】语句，可以将列表框List1中当前选定的列表项的值替换成\。 A．List1.AddItem \，List1.ListIndex B．List1.Text=\C．List1.List（List.ListIndex）= \．前三项均可 17. 某过程中有以下语句： Dim V As Integer V=\语句1 V=V*V '语句2 则将产生错误，原因是【 】。 A．语句1有语法错误 B．语句1运行时产生类型不匹配错误 C．语句2有语法错误 D．语句2运行时产生“溢出”错误 18.下列程序段的执行结果为【 】。 a = \ b = \a = Val(a) + Val(b) b = Val(\If a <> b Then Print a ? b Else Print b ? a A.?9 B.9 C.12?12 D.0 19. 多分支选择结构的Case语句中“表达式列表”不能是【 】。 A．常量值的列表，如Case 1,3,5 B．变量名的列表，如Case x,y,z C．To 表达式，如Case 10 To 20 D．Is关系表达式，如Case Is<20 20. 关于Exit For语句的使用说明正确的是【 】。 A.Exit For语句可以退出任何类型的循环 B.一个循环只能有一个这样的语句 C.Exit For表示返回For语句去执行 D.一个For循环中可以有多条Exit For语句 2

试 卷 专 用 纸

21. 判断下面循环体的执行次数【 】。 Dim m As Integer m=3 For i=1 To 20 Step m i=i+2 m=m+i

Next i

A．2 B．3 C．4 D．7 22下列循环能正常结束循环的是【 】。 A．i=5 B．i=1 Do Do i=i+1 i=i+2 Loop Until i<0 Loop Until i=10 C．i=10 D．i=6 Do Do i=i+1 i=i?2 Loop Until i>0 Loop Until i=1 23. 若有说明：Dim a（1 to 10） As Integer，则下列应用【 】合法。 A．a（1）=\ B．a（7）=32768 C．a（8）= \ D．a（0）=2.3

24. 以下说法不正确的是【 】。 A．使用ReDim语句可以改变数组的维数 B．使用ReDim语句可以改变数组的类型 C．使用ReDim语句可以改变数组每一维的大小 D．使用ReDim语句可以对数组中的所有元素进行初始化 25. 设用复制、粘贴的方法建立了一个命令按钮数组Commandl，以下对该数组的 说法错误的是【 】。 A.命令按钮的所有Caption属性都是Commandl

B.在代码中访问任意一个命令按钮只需使用名称Commandl C.命令按钮的大小都相同 D.命令按钮共享相同的事件过程 26. 执行以下Command1的Click事件过程在窗体上显示的结果为【 】。 Option Base 1 Private Sub Command1_Click() Dim a a=Array(1,2,3,4) j=1

江 南 大 学 考

For i=4 To 1 Step ?1 s=s+a(i)*j : j=j*10 Next i Print s End Sub

A．4321 B．12 C．34 D．1234 27. 下面关于过程参数的说法错误的是【 】。 A．过程的形参不可以是定长字符串类型的变量

B．形参是定长字符串的数组，则对应的实参必须是定长字符串型数组，且长度相同

C．若形参是按地址传递的参数，形参和实参也能以按值传递方式进行形实结合 D．按值传递参数，形参和实参的类型可以不同，只要相容即可

28. 在窗体Form1 中用“Public Sub Fun（x As Integer，y As Single）”定义过程Fun，在窗体 Form2中定义了变量i为Integer，j为Single，若要在Form2的某事件过程中调用Form1中的Fun 过程，则下列语句中，正确的语句有【 】个。

（1）Call Fun(i，j) （2）Call Form1.Fun(i，j) （3）Form1.Fun (i)，j （4）Form1.Fun i+1, (j) A．1 B．2 C．3 D．4 29. 标准模块中有如下程序代码：

Public x As Integer, y As Integer Sub Var_pub() x = 10 : y = 20 End Sub

在窗体上有1个命令按钮，并有如下事件过程：

Private Sub Command1_Click() Dim x As Integer Call Var_pub x = x + 100 y = y + 100 Print x; y End Sub

运行程序后单击命令按钮，窗体上显示的是【 】。 A．100 100 B．100 120 C．110 100 D．110 120

30. 某人设计了下面的函数Fun，功能是返回参数a中数值的位数，在调用该函数时发现返回的结果不正确，函数需要修改，下面的修改方案中正确的是【 】。

Function Fun(a As Integer) As Integer Dim n%

3

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说教育文库2012-2013-1VB期末试卷(A)在线全文阅读。