首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件vbsj4.vbp。程序运行后,如果单击“开始”按钮,则图片自左向右移动,同时滚动条的滑块随之移动,每0.5秒移动一次。当图片完全移出窗体的右边界时,立即再从窗体的左边界开始重新移动,若单击“停止”按钮,则图片停止移动,如图3-
在考生文件夹下有一个工程文件vbsj4.vbp。程序运行后,如果单击“开始”按钮,则图片自左向右移动,同时滚动条的滑块随之移动,每0.5秒移动一次。当图片完全移出窗体的右边界时,立即再从窗体的左边界开始重新移动,若单击“停止”按钮,则图片停止移动,如图3-
admin
2019-06-11
141
问题
在考生文件夹下有一个工程文件vbsj4.vbp。程序运行后,如果单击“开始”按钮,则图片自左向右移动,同时滚动条的滑块随之移动,每0.5秒移动一次。当图片完全移出窗体的右边界时,立即再从窗体的左边界开始重新移动,若单击“停止”按钮,则图片停止移动,如图3-56所示。在窗体文件中已经给出了全部控件,但程序不完整。
要求:请去掉程序中的注释符,把程序中的“?”改为正确的内容,使其实现上述功能,但不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。
程序源码:
选项
答案
审题分析 本题源程序利用计时器的Timer事件来控制图片的移动,因此单击“开始”按钮启动计时器,而单击“停止”按钮就是要停止计时器。在计时器的Timer事件过程中,通过每次使图片框的Left属性值增量200实现移动,并让水平滚动条滑块的位置随图片框的Left属性值变化。当图片完全移出窗体的右边界(即Picl.Left>Me.Width)时,则重新从窗体左边界开始移动,即:Picl.Left=0。由于题目要求不能在设计阶段修改控件属性,要想在单击“开始”按钮时能启动计时器,就需在窗体加载事件过程中设置计时器的Interval属性,即Tmr1.Interval=500。 操作步骤 步骤1:打开考生文件夹下的工程文件vbsj4.vbp。 步骤2:进入代码编辑窗口,去掉程序中的注释符“′”,将问号“?”改为正确的内容。 参考代码: Tmr1.Enabled=False Tmr1.Interval=500 If Pic1.Left>Me.Width Then Pic1.Left=0 步骤3:按要求将文件保存至考生文件夹中。 考点链接 计时器、控件基本操作
解析
转载请注明原文地址:https://kaotiyun.com/show/6VUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列关于利用通用对话框产生的文件对话框的相关属性的描述中,错误的是
设有如下事件过程:PrivateSubCommand1_Click()Dimaa=Array(3,5,6,3,2,6,5,3,5,4,3,9,4,5,6,3,5)x=0n=UBound(a)Fori=0Tonm=0Forj=0To
在下面语句或函数中,不能描述选择结构的是
下面关于控件数组的叙述中正确的是
工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是:PublicxAsIntegerPrivateyAsInteger窗体文件的程序代码是:DimaAsIntegerPrivateSubCommand1_Clic
下面对对象概念描述正确的是
下面不属于软件需求分析阶段主要工作的是
某二叉树中度为2的结点有10个,则该二叉树中有()个叶子结点。
以下VisualBasic不支持的循环结构是
假定建立了一个名为Command1的命令按钮数组,则以下说法中错误的是
随机试题
诉讼时效中止后,从中止时效原因消除之日起,诉讼时效期间【】
25岁男性患者,咽痛7天后出现全身浮肿、尿少,血压170/105mmHg,血红蛋白115g/L,尿蛋白(++),红细胞(+++),14天后尿量减至350ml/d,血肌酐675μmol/L,BUN28mmol/L,最可能的诊断是
膀胱癌时尿中可出现大量
首先考虑的诊断是治疗首选
下列有关变更地籍调查的特点说法,不正确的是()。
专业费用包括()等,一般采用建筑费用的一定比率估算。
项目国民经济评价中对外贸货物影子价格计算公式的表述正确的是()。
()是政府投资监管体系的重要组成部分,在政府投资监管体系中处于实施监管的地位。
阅读以下函数说明和C语言函数,将应填入(n)处的字句写在对应栏内。【函数1说明】函数palindrome(chars[])的功能是:判断字符串s是否为回文字符串。若是,则返回0,否则返回-1。若一个字符串顺读和倒读都一样时,则可称该字符
窗体上有一个名称为Optionl的单选按钮数组,程序运行时,当单击某个单选按钮时,会调用下面的事件过程PrivateSubOptionl_Click(IndexAsInteger)…EndSub下面关于此过程的参数Index的叙
最新回复
(
0
)