首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下的工程文件sjt3.vbp中有2个初始标题分别为“移动”和“退出”的命令按钮;1个初始状态为不可用的时钟Timer1。请添加1个标签Label1,其标题为“计算机考试”,字体为黑体小四号字,左边界为500,且能根据显示的内容自动调整大小,如图所
考生文件夹下的工程文件sjt3.vbp中有2个初始标题分别为“移动”和“退出”的命令按钮;1个初始状态为不可用的时钟Timer1。请添加1个标签Label1,其标题为“计算机考试”,字体为黑体小四号字,左边界为500,且能根据显示的内容自动调整大小,如图所
admin
2015-08-12
50
问题
考生文件夹下的工程文件sjt3.vbp中有2个初始标题分别为“移动”和“退出”的命令按钮;1个初始状态为不可用的时钟Timer1。请添加1个标签Label1,其标题为“计算机考试”,字体为黑体小四号字,左边界为500,且能根据显示的内容自动调整大小,如图所示。
程序功能如下:
①单击标题为“移动”的按钮时,该按钮标题自动变换为“暂停”,且标签在窗体中开始向右移动。当标签右侧到达窗体右边界时,标签移动的方向改变为从右向左移动;当标签左侧触及窗体左边界时,标签移动的方向改变为从左向右移动,如此反复。
②单击标题为“暂停”的按钮时,该按钮的标题自动变换为“移动”,并暂停标签内容的移动。
③单击“退出”按钮,则结束程序的运行。
命令按钮的Click事件过程已经给出,但事件过程不完整,请将其中注释符去掉,把“?”改为正确的内容,以实现上述程序的功能。
注意:不得修改窗体文件中已经存在的控件和程序,最后将修改后的文件按原文件名进行存盘。
选项
答案
【操作步骤】 步骤1:打开本题工程文件,并设置控件的属性。程序中涉及的控件及属性见表1。 [*] 步骤2:分析并编写程序代码。 程序提供代码如下: Dim nag As Integer Private Sub Form_Load() flag=0 End Sub Private Sub Command1_Click() If Command1.Caption="移动"Then Timer1.Enabled=? Command1.Caption="暂停" Else Timer1.Enabled=False Command1.Caption="移动" End If End Sub Private Sub Command2_Click() End End Sub Private Sub Timer1_Timet() Select Case flag Case Is=0 ’Label1.Left=Label1.Left?100 If Label1.Left+Label1.Width=Form1.Width Then flag=1 Case Is=1 ’Label1.Left=Label1.Left?100 If.ahel1.Left=0 Then flag=0 End Select End Sub 参考答案: 第1个?处填入:True 第2个?处填入:+ 第3个?处填入:- 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
在计时器的Timer事件过程中,通过设置标签的Left属性值使其在原有基础上加100来实现自左向右移动的功能。在“开始”按钮的单击事件过程中应启动计时器,禁用“移动”按钮,并改变其标题为“暂停”。在“退出”按钮的单击事件过程中要通过End语句停止程序。
转载请注明原文地址:https://kaotiyun.com/show/oSQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设通用对话框控件的名称为CD1,希望在打开文件对话框中的“文件类型”列表中包含:所有文件、Word文档和文本文件这3类文件,在程序中设置Filter属性时正确的是
下列程序段的执行结果为a="ABBACDDCBA"ForI=6To2Step-2x=Mid(a,I,I)y=Leh(a,I)z=Right(a,I)z=x&y&
下面控件中,用于将屏幕上的对象分组的是
以下控件可作为其他控件容器的是
任何控件都有______属性。
执行以下程序段,并输入1.23,则程序的输出结果应是【】。N=Str(InputBox("请输入一个实数:"))p=InStr(N,".")PrintMid(N,p)
在3种不同类型的组合框中,只能选择而不能输入数据的组合框是【】。
在先左后右的原则下,根据访问根结点的次序,二叉树的遍历可以分为三种;前序遍历、【】遍历和后序遍历。
从键盘上输入两个字符串,分别保存在变量str1、str2中。确定第二个字符串在第一个字符串中起始位置的函数是
设窗体上有一个通用对话框控件CD1,希望在执行下面程序时,打开如图所示的文件对话框PrivateSubCommand1_Click()CDl.DialogTitle=“打开文件”CDl.InitDir=“C:\”CDl.Filter=“所有文件
随机试题
按照管理者的控制方式分类,控制可分为()
Myhusbandandchildrenfeelveryhappytolivehere.Theycan’tseethatweliveonadirtystreetinadirtyhouseamongpeopl
关于急性泪腺炎的临床特点,描述不正确的是
下列有关IgE测定方法,错误的是
对补体活化起抑制作用的是
不需要记入排出量的内容是
项目管理规划的作用包括()。
20×9年6月30日,甲公司与乙公司签订租赁合同,从乙公司租入一栋办公楼。根据租赁合同的约定,该办公楼不可撤销的租赁期为5年,租赁期开始日为20×9年7月1日,月租金为25万元,于每月末支付,首3个月免付租金,在不可撤销的租赁期到期后,甲公司拥有3年按市场
给定资料1.近年,厦门市的广告行业出现一种奇特的怪现象。广告业公司发现,相中的好路段、好的户外媒体位置通过正常渠道向工商局报批很难获得批准。工商局或直接回复不予批准,或发出红头文件说明该重要路段(位置)由于城市规划等原因不再审批。看似公事公办
BellewouldbefedsomefruitjuiceifsheWhichofthefollowingstatementsindicatesthesuccessoftheexperiment?
最新回复
(
0
)