【VB开源代码栏目提醒】：网学会员为广大网友收集整理了，VB程序设计期末考试卷 - 计算机教材，希望对大家有所帮助！

第1页 《VB程序设计》期末考试卷 试卷十八 一、 语言基础题40分 判断题10分 1窗体的标题必须在程序启动前确定在程序运行过程中窗体标题是不能改变的。

     2变量尾部的符号隐式声明变量为整型。

     3对象的top和left属性值都必须大于或等于零。

     4控件数组的每个元素都有相同的name属性值和不同的index属性值。

     5框架是一个控件容器可以引入圆形控件但不能用Circle方法画圆。

     6Commondialog 对象的showsave方法能保存用户指定的文件。

     7滚动条、文本框、INPUTBOX函数都可用于数据输入。

     8当拖曳滚动条中的滚动框时便发生滚动条scroll事件。

     9一个菜单项也是一个对象它不能和当前窗体中的任何对象同名。

     10 执行语句pic.cls将清除图片框pic中用绘图语句绘制的图形。

     单选题10分 1命令按钮Command1设置为不可见应修改该命令按钮的______属性。

     A Visible B Value C Caption D Enabled 2通用对话框控件Commondialog1显示为打开文件对话框可以改变该控件的哪个属性 A Open B FileName C Action D Filter 3以下哪个控件不能做为容器控件 A Form B PictureBox C Frame D Image 4当设置了定时器的有关属性后使窗体自动向下移动的语句是哪条 A Move Left Top 100 B Move Top 100 C Move Top 100 D Move Top Top 100 5水平滚动条HScroll1的LargeChange属性值为100表示________为100。

     A 该滚动条值的最大值 B 拖动滚动框时滚动条值的变化量 C 单击滚动箭头和滚动框之间某位置时的滚动条值的变化量 D 单击滚动箭头时的滚动条值的变化量 6Sub 过程与Function 过程最根本的区别是 A 前者可以使用Call 或直接使用过程名调用 后者不可以. B 后者可以有参数 前者不可以. C 两种过程参数的传递方式不同. D 前者无返回值但后者有 7要将Shape控件的形状设置为圆应该设置Shape控件的什么属性 A Name B Caption C Shape D Circle 第2页 8哪一条语句执行后将会删除文本框Text1中的文本 A Text1.Caption”” B Text1.Text”” C Text1.Clear D Text1.Cls 9 以下哪个对象不能响应Click事件 A 列表框 B 图片框 C 窗体 D 定时器 10 要将窗体设置为固定大小应该设置窗体什么属性 A ScaleWidth和ScaleHeight B BorderStyle C AutoSize D ScaleMode 填空题20分 1将数学式bxaek1写成VB表达式。

     2语句Option Explicit的作用是 3声明一个值为3.14的常量Pi的语句为 4已知a2b3c4d5 求表达式not a0 ssx xx-1 Loop Print s s End Sub 写出连续单击窗体三次第一次输入3第二次输入-2第三次输入1窗体上显示的结果。

     3 Dim x As Integer Private Sub Form_Click Dim z As Integer Static y As Integer z1 Call abcyz Print x x y y z z End Sub Public Sub abca As Integerb As Integer aa1 bba xx1 第4页 End Sub 写出连续单击窗体两次后程序运行结果。

     4Private Sub Form_Click Dim a As Stringb As Integer Dim sum As Integerave As Single Dim count As Integer Open c:data1.dat For Input As 1 Do While Not EOF1 Input 1 a b If Lefta 1 李 Then Print a b sumsumb countcount1 End If Loop avesum/count aveIntave100.5/10 Print “ave”ave Close 1 End Sub 已知在c:data1.dat文件中数据如下 张寇78李琳80王澜56司马38李晓90刘召50李名45 写出单击窗体后程序的运行结果。

     第5页 三、程序填空题20分直接在横线上填写遗漏的语句。

     1下列程序段是计算1234...20并打印出来。

     Option Explicit Private Sub Form_Click Dim S As Single j As Integer For j 1 To 20 nfactor S S F Next j Form1.Print S S End Sub Sub nfactorByVal n As Integer Dim I As Integer Dim temp As Single For temp temp I Next I End Sub 2下列程序段实现在标签中自动依次显示中国浙江杭州西湖。

     Private Sub Form_Load Label1.AutoSize True: Label1.FontSize 24 Label1.Caption Timer1.Interval 1000 Timer1.Enabled End Sub Private Sub Timer1_Timer Select Case Label1.Caption Case Label1.Caption 中国 Case Label1.Caption 浙江 Case Label1.Caption 杭州 Case Else Label1.Caption 西湖 End Select End Sub 第6页 四、程序设计题20分 1已知三角形三条边abc求三角形面积的公式为 S√ss-as-bs-c其中sabc/2 编写程序由键盘输入abc的值首先判断给出的三条边能否构成三角形若能计算出三角形的面积S并在窗体上输出三条边的值及面积的值否则要求重新输入三条边。

    提示判断条件为任意两条边之和必须大于第三条边 2设计一个密码检验程序假定密码为“123456”如果密码正确则运行c下的a.exe文件如果密码错误可以再输入一次若两次密码都出错则给出提示并结束程序运行。

     请简要说明你的设计思路画出界面设计草图、列出需要的控件及相关属性的设置并写出要执行的事件过程的程序代码。

     第7页