首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt3.vbp。窗体上有名称为Timer1的定时器,以及名称为Line1和Line2的两条水平直线。请用名称为Shape1的形状控件,在两条直线之间画一个宽和高都相等的形状,其显示形式为圆,并设置适当属性使其满足以下要求:
在考生文件夹下有一个工程文件sjt3.vbp。窗体上有名称为Timer1的定时器,以及名称为Line1和Line2的两条水平直线。请用名称为Shape1的形状控件,在两条直线之间画一个宽和高都相等的形状,其显示形式为圆,并设置适当属性使其满足以下要求:
admin
2016-01-31
19
问题
在考生文件夹下有一个工程文件sjt3.vbp。窗体上有名称为Timer1的定时器,以及名称为Line1和Line2的两条水平直线。请用名称为Shape1的形状控件,在两条直线之间画一个宽和高都相等的形状,其显示形式为圆,并设置适当属性使其满足以下要求:
①圆的顶端距窗体Form1顶端的距离为360;
②圆的颜色为红色(红色对应的值为&H000000FF&或&HFF&),如图3-70所示。
程序运行时,Shape1将在Line1和Line2之间运动。当Shape1的顶端到达Line1时,会自动改变方向而向下运动;当Shape1的底部到达Line2时,会改变方向而向上运动。
文件中给出的程序不完整,请去掉程序中的注释符,把程序中的?改为正确内容,使其实现上述功能。
注意:不能修改程序的其他部分和己给出控件的属性。最后将修改后的文件按原文件名存盘。
选项
答案
审题分析 本题在计时器的Timer事件过程中,Shape1每次上下移动的距离为s(值为负向上移动,值为正向下移动,初值为-40),若Shape1向上移动后其Top属性值小于或等于Line1的Y1(或Y2)属性值,则S取其相反数,Shape1向下移动。若Shape1向下移动后其Top属性值与其Width属性值之和大于或等于Line2的Y1(或Y2)属性值,则s再取其相反数,Shape1向上移动。 窗体加载时,计时器启动,Shape1开始在Line1和Line2之间运动。 操作步骤 步骤1:打开考生文件下的本题工程文件sjt3.vbp,在窗体上两条水平直线间画一个形状控件,并如表4-42设置其属性。 [*] 步骤2:在代码编辑窗口,去掉程序中的注释符“′”,将问号“?”改为正确的内容。 参考代码: Timer1.Enabled=True If Shape1.Top<=Lin1.Y1 Then If Shape1.Top+Shape1.Height>=Lin2.Y1 Then 步骤3:按要求将文件保存至考生文件夹中。 考点链接 形状控件、计时器。
解析
转载请注明原文地址:https://kaotiyun.com/show/RuLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
只能用来显示字符信息的控件是()。
当标签的标题内容太长,需要根据标题自动调整标签的大小时,应设置标签的()属性为True。
组合框有3种不同的类型,这3种类型是下拉式列表框、简单组合框和下拉式组合框,分别通过把Style属性设置为______来实现。
按文件的访问方式不同,可以将文件分为()。
语句DimArr(-3To5)AsInteger定义的数组的元素个数是()。
只能用来显示文本信息的控件是()。
执行下面程序,第一行输出结果是[],第二行输出结果是[]。OptionExplicitPrivateSubForm_Click()DimAAsIntegerA=2CallSub1(A)EndSubPriv
要获得文件列表框中当前被选中的文件的文件名,则应使用哪个属性
下列程序段的执行结果为a=6Fork=1T00a=a+kNextPrintk;a
随机试题
有关用电操作正确的是()。
A、肢端肥大症B、巨人症C、侏儒症D、黏液性水肿E、呆小症成年甲状腺功能低下,会导致
下列各项中,不会引起留存收益总额发生增减变动的有( )。
在Excel工作表中公式被复制后,参数的地址不发生变化,这种引用形式称为______。
甲将一块罗马表丢失,被人捡到送至失物招领处。招领期限过后因无人认领,该表被拍卖给乙。后丙盗得该表并将其转卖给丁。该案查获后,甲、乙、丁都主张该表的所有权。该表应归谁所有()。
某派出所拟开展以“拒绝家暴,关爱儿童健康成长”为主题的系列宣传活动,不宜采取的方式是:
简述弗里德曼的货币需求理论。
当使用fstram流类定义一个流对象并打开一个磁盘文件时,文件的隐含打开方式为
Readthefollowingarticleandanswerquestions9-18onthenextpage.Addiction1.Theword"addiction"isoftenusedl
(Paragraph8,Passage1)ShequalifiedfortheOlympicsafterclaimingagainthenationalchampioninherthirdcomebacklastAp
最新回复
(
0
)