首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt4.vbp,窗体上已经添加所有控件,如图所示。在程序运行时,如果单击“开始”按钮,则每隔0.1秒窗体上的汽车图标向右移动一次(初始状态下不移动);如果单击“停止”按钮,则停止移动。 请完成以下工作: ①设置适当控件的适当
在考生文件夹下有一个工程文件sjt4.vbp,窗体上已经添加所有控件,如图所示。在程序运行时,如果单击“开始”按钮,则每隔0.1秒窗体上的汽车图标向右移动一次(初始状态下不移动);如果单击“停止”按钮,则停止移动。 请完成以下工作: ①设置适当控件的适当
admin
2016-06-23
29
问题
在考生文件夹下有一个工程文件sjt4.vbp,窗体上已经添加所有控件,如图所示。在程序运行时,如果单击“开始”按钮,则每隔0.1秒窗体上的汽车图标向右移动一次(初始状态下不移动);如果单击“停止”按钮,则停止移动。
请完成以下工作:
①设置适当控件的适当属性,使得每0.1秒汽车图标向右移动一次,而初始状态下不移动。
②请去掉程序中的注释符,把程序中的?改为正确的内容。
③为两个命令按钮编写适当的事件过程,最后以原文件名存盘。
注意:不得修改已经给出的程序。编写事件的过程中不能使用变量,每个事件过程中只能有一条语句。
选项
答案
[操作步骤] 步骤1:打开本题工程文件,设置计时器Interval的属性为100,将Enabled属性设置为False。 步骤2:打开代码编辑窗口,在指定位置编写如下代码。 参考代码 Private Sub Timer1_Timer()P1.
Left=
P1.Left+20 End Sub ’需要考生编写的内容 Private Sub C1_Click() Timer1.Enabled=True End Sub Private Sub C2 Click() Timer1.Enabled=False End Sub步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://jikaoti.com/ti/Q9J0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设已经在菜单编辑器中设计了窗体的快捷菜单,某顶级菜单为a1,且取消其“可见”属性。运行时,以下()事件过程可以使快捷菜单的菜单项响应鼠标左键单击和右键单击。
块结构条件语句中的必选项是______。
当循环队列非空且队尾指针等于队头指针时,说明循环队列已满,不能进行人队运算,这种情况称为______。
VisualBasic根据计算机访问文件的方式将文件分成三类,其中不包括()。
有如下程序:PrivateSubForm_Click() DimCheck,Counter Check=True Counter=0 Do DoWhileCounter<20 Coun
在Visual:Basic的立即窗口内输入以下语句:X=65<CR>PrintChr$(x)<CR>在窗口中显示的结果是
下列叙述中错误的是
设s="中华人民共和国",表达式Left(S,1)+Right(S,1)+Mid(S,3,2)的值为()。
软件生命周期中所花费用最多的阶段是
在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框,其名称分别为Drivel、Dir1和File1,为了使它们同步操作,必须触发____________事件和____________事件,在这两个事件中执行的语句分别为____________和__
随机试题
治疗外感风寒兼气滞胸脘满闷、恶心呕逆者,宜首选
乌梅丸的君药是
工资项目的预算首先应当分析当地政府有关部门本年度发布的()对工资预算的影响,如有变化应进行必要的调整。
(2016·四川)按照我国教育法规的纵向形式层次划分,《中华人民共和国义务教育法》属于()
真理的相对性是指()。
下列关于自然常识的描述,正确的是:
“酸葡萄心理”是因为自己真正的需求无法得到满足产生挫折感时,为了解除内心不安,编造一些“理由”自我安慰,以消除紧张,减轻压力,使自己从不满、不安等消极心理状态中解脱出来,保护自己免受伤害。根据上述定义,下列不属于“酸葡萄心理”的是:
阅读以下应用说明及VisualBasic程序代码,将应填入(n)处的字句写在答题纸的对应栏内。应用说明某单位举办了一场知识竞赛,有300名选手参加竞赛,依次从1~300为选手编号。竞赛时间为9:00~11:00。8道竞赛题目依次从“A”~“H”
A、 B、 C、 D、 A科学计算(数值计算)解决的大都是从科学研究和工程技术中所提出的一些复杂的数学问题。天气预报是其中的一类应用。
_______thiscomingThursdag.itwillbetoolatetoenrollforthecourse.
最新回复
(
0
)