首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt3.vbp。窗体上有名称为Timer1的定时器,以及名称为Line1和Line2的两条水平直线。请用名称为Shape1的形状控件,在两条直线之间画一个宽和高都相等的形状,其显示形式为圆,并设置适当属性使其满足以下要求:
在考生文件夹下有一个工程文件sjt3.vbp。窗体上有名称为Timer1的定时器,以及名称为Line1和Line2的两条水平直线。请用名称为Shape1的形状控件,在两条直线之间画一个宽和高都相等的形状,其显示形式为圆,并设置适当属性使其满足以下要求:
admin
2016-01-31
44
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
假定窗体的名称(Narne属性)为Forml,则把窗体的标题设置为"VBTest"的语句为()。
以下()操作不能打开属性窗口
下列操作不能向工程中添加宙体的是()。
若要将复选框设置成图形模式,则应设置()属性值为“1-vbButtonGmphical”。
语句DimArr(-3To5)AsInteger定义的数组的元素个数是()。
文本框TextBox中的内容若要设置为用户不能修改,应设置()属性。
可以用做其他控件容器的控件是
要获得文件列表框中当前被选中的文件的文件名,则应使用哪个属性
阅读下面的程序段:Fora=1To2Forb=1ToaForc=bTo2i=i+1NextNextNextPrinti执行上面的3重循环后,i的值为
随机试题
C2b4b3bH因子
可引起周围神经炎的药物是
()是除海洋产业和空间科学技术产业外一切产业项目的支撑基础。
应当在“应收账款”账户贷方核算的是()。
①切割成相同大小隔间的写字楼,吃住挤在6平方米的年轻人,月收入过万但需苦练720小时的工作流程——这就是网红工厂的生态。通过新老主播连麦、互刷礼物、买热门等推广手段,经纪公司“制造”出了千千万万个同质化的赚钱机器。但这种枯燥辛苦的生活并没有阻挡更多人涌入这
针对最近风靡网络的“抢票插件”,某专家认为,铁道部12306订票网站、电话售票渠道的开通,是为了营造公平、公正的购票环境,而使用“抢票插件”就等于插队,破坏购票规则,加上软件:本身的破坏性,最终伤害的是整个购票系统的安全。以下陈述除了哪项,均能构成对该专家
设α=()T,A=I-ααT,B=I+2ααT,其中I是4阶单位矩阵,则AB=[].
在法律运行中,最大量、最经常的工作指的是
Whatdoesitmeantobeintelligent?Mostpsychologistsagreethatabstractreasoning,problemsolving,andtheabilitytoacqui
AftertheviolentearthquakethatshookLosAngelesin1994,earthquakescientistshadgoodnewstoreport:thedamageanddeath
最新回复
(
0
)