初级程序员问答集考试卷模 拟考试题

1、姓名：_ 班级：_ 学号：_-密-封 -线- 初级程序员问答集考试卷模 拟考试题考试时间：120分钟 考试总分：100分题号一二三四五总分分数遵守考场纪律，维护知识尊严，杜绝违纪行为，确保考试结果公正。1、说明某visual basic应用程序用于监测某种锅炉设备内液面高度(050cm)，其运行窗口界面如图4-16所示。图4-16 某锅炉设备液面高度显示界面在图4-16中，设计了一个高度计(矩形形状shpmeter)及其中指示当前液面高度的水银柱(矩形形状shpt)，文字标签标记了液面高度的刻度；另有一个图片框piccurve，用于动态描述检测到的液面高度曲线(用户见到的曲线与水银柱等高变化)

2、；开始(cmdstart)按钮用于启动液面高度检测，命令按钮“暂停”(cmdstop)用于暂停液面高度检测。液面高度计形状控件shpmeter是固定的，其属性fillsstyle默认为透明。矩形形状shpt(水银柱)的 visible属性初始设置为不可见，属性filltype设置为solid(实心)，fillcolor设置为红色；图片框piccurve的属性autoredraw设置为true；程序设计过程中，创建了一个定时器timt，属性enabled初始设置为 false(不可用)，属性interval(定时间隔)的值应设置为(1)。为模拟锅炉设备液面高度的检测，程序中利用了(0，1)之间均

3、匀分布的伪随机数获得0，50之间的随机液面高度wh。为便于在图片框piccurve中绘制曲线，程序中对该图片框建立了如下坐标系统：图片框的左上角定义为原点(0，0)，水平向右方向为x轴，垂直向上方向为y轴，右下角坐标为(50.200)。为了便于观察记录的液面高度值，图片框中从上到下创建了7条水平虚线ls(i)，i=0，16，并在程序中按等间隔排列进行位置设置。应用程序中每隔3秒算出曲线点(x, y)，其中x=o，1，2，再用直线段连接各相邻曲线点形成液面高度曲线。visual basic程序代码dim(2)as integer 试题全局变量private sub cmdstart_click（

4、 ）timt.enabled =(3)shpt.visible = trueend subprivate sub cmdstop_click（ ）timt.enabled = falseend subprivate sub form_load( )dim i,s as integerpiccurve.scale (0,0)-(50,200) 设置图片框坐标系：左上角-右下角s = 25 h等于图片框高度的1/8for i = 0 to 6 设置7条水平线ls(i)的位置ls(i).x1 = 0 ls(i)起点横坐标ls(i).y1 =(4)ls(i)起点纵坐标ls(i).x2 = 50 ls(

5、i)终点横坐标ls(i).y2 = ls(i).y1 ls(i)终点纵坐标ls(i).bordercolor = &h00fcfcfc 设置水平线颜色(5)x = 0 设置曲线坐标初值end subprivate sub timt_timer ( )dim wh, h as integer wh为实时液面高度，h为图片框中液面高度点显示高度wh = int(rnd * 51) 随机模拟产生锅炉内液面高度(050 cm)h = shpmeter.height *(6)算出水银柱的高度shpt.top =(7)设置水银柱顶部位置shpt.height = h 设置水银柱的高度绘制液面高度曲线y =

6、(8)算出曲上当前点的纵坐标if x 51 then 当超出图片框时piccurve. cls 清框图片框内以前画的曲线(9)elseif x 0 then 除左边点外piccurve. line (x-1,lasty)-(x,y),vbred 由前1点到当前点画红色线段end ifx = x + 1 准备下一点坐标lasty = y 保存当前坐标供下次使用end sub1. 问题1请根据说明和图4-16所示的显示结果，将说明中(1)空缺处的内容和visual basic程序中(2)(9)空缺处的程序语句填写完整。 （ ）2、说明某visual basic应用程序用于监测某种锅炉设备内液面高度

7、(050cm)，其运行窗口界面如图4-16所示。图4-16 某锅炉设备液面高度显示界面在图4-16中，设计了一个高度计(矩形形状shpmeter)及其中指示当前液面高度的水银柱(矩形形状shpt)，文字标签标记了液面高度的刻度；另有一个图片框piccurve，用于动态描述检测到的液面高度曲线(用户见到的曲线与水银柱等高变化)；开始(cmdstart)按钮用于启动液面高度检测，命令按钮“暂停”(cmdstop)用于暂停液面高度检测。液面高度计形状控件shpmeter是固定的，其属性fillsstyle默认为透明。矩形形状shpt(水银柱)的 visible属性初始设置为不可见，属性filltyp

8、e设置为solid(实心)，fillcolor设置为红色；图片框piccurve的属性autoredraw设置为true；程序设计过程中，创建了一个定时器timt，属性enabled初始设置为 false(不可用)，属性interval(定时间隔)的值应设置为(1)。为模拟锅炉设备液面高度的检测，程序中利用了(0，1)之间均匀分布的伪随机数获得0，50之间的随机液面高度wh。为便于在图片框piccurve中绘制曲线，程序中对该图片框建立了如下坐标系统：图片框的左上角定义为原点(0，0)，水平向右方向为x轴，垂直向上方向为y轴，右下角坐标为(50.200)。为了便于观察记录的液面高度值，图片框中

9、从上到下创建了7条水平虚线ls(i)，i=0，16，并在程序中按等间隔排列进行位置设置。应用程序中每隔3秒算出曲线点(x, y)，其中x=o，1，2，再用直线段连接各相邻曲线点形成液面高度曲线。visual basic程序代码dim(2)as integer 试题全局变量private sub cmdstart_click（ ）timt.enabled =(3)shpt.visible = trueend subprivate sub cmdstop_click（ ）timt.enabled = falseend subprivate sub form_load( )dim i,s as in

10、tegerpiccurve.scale (0,0)-(50,200) 设置图片框坐标系：左上角-右下角s = 25 h等于图片框高度的1/8for i = 0 to 6 设置7条水平线ls(i)的位置ls(i).x1 = 0 ls(i)起点横坐标ls(i).y1 =(4)ls(i)起点纵坐标ls(i).x2 = 50 ls(i)终点横坐标ls(i).y2 = ls(i).y1 ls(i)终点纵坐标ls(i).bordercolor = &h00fcfcfc 设置水平线颜色(5)x = 0 设置曲线坐标初值end subprivate sub timt_timer ( )dim wh, h as integer wh为实时液面高度，h为图片框中液面高度点显示高度wh = int(rnd * 51) 随机模拟产生锅炉内液面高度(050 cm)h = shpmeter.height *(6)算出水银柱的高度shpt.top =(7)设置水银柱顶部位置shpt.height = h 设置水银柱的高度绘制液面高度曲线y =(8)算出曲上当前点的纵坐标if x 51 then 当超出图片框时piccurve. cls 清框图片框内以前画的曲线(9)elseif x 0 then 除左边点外piccurve. line (x-1,la