试卷适用班级 2006级本专科学生 班级 姓名 学号 VB 课程试卷 （ B ）卷 第 1 页 共 3 页 题号一二三四五六七八九十总分得分审核得分阅卷人 一、填空题（每小题2分，共20分）1表达式 Int(-7.8)+Sgn(7.8)的值是_。2Picture图片框要适应图片的大小，应将AutoSize属性设置为_。3下面程序运行后输出的结果是_。Dim X%, Y%X=6Y=3X= X - YY= X * YPrint X; Y4设置字体大小的属性是_。5命令按钮最常用的事件是_。6计算Z的值：当X大于等于Y时，Z=X，否则 Z=Y 请写出IF语句_。 7在For、While和Do循环语句中， _循环语句不能解决循环次数不确定的问题。8为停止计时器控件计时，应将计时器控件的Enabled属性设置为_。9在VB中，实参与形参的结合有两种方法：_和传值。10VB提供的_函数可生成输入框。得分阅卷人 二、选择题（每小题2分，共20分）1在设计模式下，双击某个控件可以打开VB_窗口。A. 属性 B. 代码 C. 工程资源管理器 D. 工具箱2字符串函数Mid (“BisualBasic”, 7, 3) 的函数值是_。A. Bis B. sualBas C. sua D. Bas3VB三种语句控制结构是顺序结构、分支结构和_。A. 赋值语句 B. InputBox语句 C. MsgBox语句 D. 循环结构4下列程序运行后，窗体上显示的结果是_。 Private sub form_ click()x= -9If Sgn (x)=true theny=Sgn (x2)Elsey=Sgn (x)End IfPrint yEnd subA. -9 B. 81 C. 1 D. 15下列程序的执行结果是_。Private sub form_click() x=10i=6.5While I4.9x=x-1i=i-0.5Wendprint xEnd subA. 4.5 B. 5 C. 6 D. 6.56要在标签Label1中同步显示文本框Text1里输入的内容，必须触发Text1的_。A. Click事件 B. DbClick事件 C. Change事件 D. LostFocus事件7某个组合框中共有5个列表选项，_可以删除最后一个选项。A. Combo1.RemoveItem 5 B. Combo1.RemoveItem combo1.listCount C. Combo1.RemoveItem Text D. Combo1.RemoveItem 48Option base 1Dim A %(4) 所定义的数组A中，共有_个元素。A. 4 B. 5 C. 25 D.16密封线 试卷适用班级 2006级本专科学生 班级 姓名 学号 VB 试卷 （ B ）卷 第 2 页 共 3 页 9关于Sub过程和Function过程下列说法， _是正确的。A. Sub过程有形参，Function过程没有形参 B. Sub过程不能用Call语句调用C. Sub过程能返回过程值，Function过程不能返回函数值D. Function过程可以使用函数名返回函数值10有关VB菜单的描述如下，其中正确的选项是_。A. VB菜单分下拉式菜单、弹出式菜单和浮动式菜单B. 要建立弹出式菜单，必须将主菜单的Visible 属性设置为FalseC. 在菜单中插入分割条，需要在菜单编辑器的标题栏中输入“+”号D. PopupMenu方法可用来显示下拉菜单得分阅卷人 三、编程题（每小题10分，共60分）1. 编写程序计算出一元二次方程的根，其中b2-4ac大于零时，有两个实根，b2-4ac等于零时，有一个实根，b2-4ac小于零时，有两个复根。2编写程序，判断一个整数是否能被3和17同时整除。3编写程序打印100到900之间的所有素数，并统计100到900之间素数的个数。 密封线 4使用循环语句编写程序打印输出下列图形： * * *5编程序用随机函数产生有50个200以内的整数存放在一维数组中，按从小到大进行排序打印。 6在窗体上一个命令按钮command1，编写command1的click事件过程，完成如下功能：（1）编写一个子过程， 计算13+24+35+（n-2）n的值。（2）输入n的值，将计算结果显示在窗体上。 试卷适用班级 2006级本专科学生 班级 姓名 学号 VB 课程试卷（ B ）卷 第 3 页 共 3 页密封线