二、简单应用题
第 1 小题
【审题分析】本题"计算"按钮单击事件过程源代码的设计思路:先用两变 a 和 b 分别记录在两个文本框输入的数据,并通过比较大小,使变 b 的值始终大于变 a 的值,
t 为交换变 a 和 b 值的中间变 。然后利用 For 循环(循环变 i 的初值为 a,终值为 b), 将 i 的值逐个累加到变 s,循环结束时将变 s 的值显示在文本框中。
【操作步骤】
步骤 1:打开考生文件下的本题工程文件 vbsj3.vbp,在代码编辑窗口,编写"计算" 按钮的 Click 事件过程。
参考代码:
b
s
= i
= s + i
步骤 2:按要求将文件保存至考生文件夹中。
108
第 2 小题
【审题分析】本题全部控件已画出,相关属性设置也在程序源码的窗体加载事件中设置,只需按题目要求完善其他相关事件过程。由于标签在窗体上的移动是在计时器的 Timer 事件过程中完成的,单击"开始"按钮时就应启动计时器,因此 Cmd1_Click 事件过程中的第 1 个?处应为 True;要禁用"开始"按钮就应设置其 Enabled 属性值为 False,第 2 个?处应为 False。
单击"停止"按钮时要停止标签移动,就是要停止计时器,故 Cmd2_Click 事件过程中的第 3 个?处应为 False。在 Tmr1_Timer 事件过程中,要让标签每次自左至右移动 50, 可在每个时间间隔使标签的 Left 属性值在原有基础上加 50 来实现,故该事件过程中第 4 个?处应改为:Lab1.Left + 50;为防止标签移出窗体,在执行移动语句前先用 If?Then?
Else 对其位置进行判断。
【操作步骤】
步骤 1:打开考生文件下的本题工程文件 vbsj4.vbp,在代码编辑窗口,去掉程序中的 注释符"’",将问号"?"改为正确的内容。
参考代码:
Tmr1.Enabled = True
Cmd1.Enabled = False
Tmr1.Enabled = False
Lab1.Left = Lab1.Left + 50
步骤 2:按要求将文件保存至考生文件夹中。
编辑推荐:
北京 | 天津 | 上海 | 江苏 | 山东 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
广东 | 河北 | 湖南 | 广西 | 河南 |
海南 | 湖北 | 四川 | 重庆 | 云南 |
贵州 | 西藏 | 新疆 | 陕西 | 山西 |
宁夏 | 甘肃 | 青海 | 辽宁 | 吉林 |
黑龙江 | 内蒙古 |