首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,其窗体中有一个实心圆。程序运行时,当用鼠标左键单击窗体任何位置时,实心圆则向单击位置直线移动;若用鼠标右键单击窗体,则实心圆停止移动。窗体文件中已经给出了全部控件,但程序不完整。 要求:请去掉程序中的注释符,把
在考生文件夹下有一个工程文件sjt5.vbp,其窗体中有一个实心圆。程序运行时,当用鼠标左键单击窗体任何位置时,实心圆则向单击位置直线移动;若用鼠标右键单击窗体,则实心圆停止移动。窗体文件中已经给出了全部控件,但程序不完整。 要求:请去掉程序中的注释符,把
admin
2017-03-27
46
问题
在考生文件夹下有一个工程文件sjt5.vbp,其窗体中有一个实心圆。程序运行时,当用鼠标左键单击窗体任何位置时,实心圆则向单击位置直线移动;若用鼠标右键单击窗体,则实心圆停止移动。窗体文件中已经给出了全部控件,但程序不完整。
要求:请去掉程序中的注释符,把程序中的“?”改为正确的内容,使其能正确运行,不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。
选项
答案
步骤1:打开考生文件下的本题工程文件sjt5.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: stepx=0 stepy=a*stepx Timer1.Enabled=True Timer1.Enabled=False Shape1.Move Shape1.Left+stepx. _Shape1.Top+stepy 步骤2:按要求将文件保存至考生文件夹中。
解析
本题在窗体的鼠标按下事件过程中,若按下的是鼠标左键,则通过计算得出圆心的坐标。若圆心与当前鼠标按下点位于同一竖线上时(即x=x0),则设定实心圆纵向移动增量为stepy=Sgn(y-y0)*50,横向移动增量则为0(即stepx=0);否则设定实心圆横向移动增量为stepx=Sgn(x-x0)*50,并根据斜率a计算出纵向移动增量:stepy=a*stepx,若计算出的纵向移动增量stepy绝对值大于横向移动增量绝对值stepx,则重新设定实心圆纵向移动增最为stepy=Sgn(y-y0)*50,计算出横向移动增量stepx=stepy/a,以防止实心圆移动速度不均。启动计时器Timer1(设置其Enabled属性值为True),利用其Timer事件过程控制实心圆移动。
根据计算出的实心网横向移动增量和纵向移动增量,其移动的语句为:Shape1.MoveShape1.Left+stepx,Shape1.Top+stepy。
转载请注明原文地址:https://kaotiyun.com/show/dmGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体的属性可在属性窗口中设置,也可在程序中用【】语句动态设置。
以下程序用于计算“1+1/3+1/5+…+1/(2n+1)”,直至“1/(2n+1)”小于10-4。阅读下面程序,请在【】和【】处填上正确内容。PrivateSubCommand1_Click()Sum=h:n=idon=【
执行如下程序段后,intsum的值为______。PrivateSubCommand1_Click()sum=0Fori=1To18Step2Forj=2To6If(iModj)<>0Thensum=sum+jNex
测试的目的是暴露错误,评价程序的可靠性;而【】的目的是发现错误的位置并改正错误。
假定窗体上有一个文本框,名为txt1,为了使该文本框的内容能够换行,并且具有垂直滚动条,没有水平滚动条正确的属性设置为
在窗体上面一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimaAsInteger,sAsIntegera=8s=1D
下列不能打开菜单编辑器的操作是()。
相对于数据库系统,文件系统的主要缺陷有数据关联差、数据不一致性和______。
VisualBasic根据计算机访问文件的方式将文件分成三类,其中不包括______。
结构化程序设计主要强调的是______。
随机试题
药敏试验时常报告“中介”结果,你知道其临床意义吗?
高某和韩某因共同抢劫被判处死刑立即执行,该案件经高级人民法院复核后,报请最高人民法院核准。最高人民法院经审查发现,高某的死刑判决认定事实清楚,证据确实充分;对于韩某的判决认定事实正确,但依法不应当判处死刑。对此,最高人民法院的正确处理方式是:()
如下图所示等直杆受力情况,横截面面积A=50mm2,则图中横截面m-m上正应力为()
根据行政复议法及相关规定,在下列哪些情形下,当事人可以申请行政复议?
“忧者见之则忧,喜者见之则喜”,这是受一个人的()的影响所致。
We’veallseentheheadlinesaboutmobilephones.Ifyoubelievedeverythingyouread,you’dthrowyourmobileawayimmediately
Theyearwhichprecededmyfather’sdeathmadegreatchangeinmylife.IhadbeenlivinginNewJersey,workingdefenseplants,
LanguageDespitethefactthatmanydefinitionsoflanguagehavebeenproposed,succinctdefinitionsoflanguageusuallybringv
Whichofthefollowingitalicizedpartsisapredicativeclause?
A、Crown’s.B、Mrs.Peterson’s.C、Peter’s.D、Mr.Peterson’s.B信息明示题,男士开始便说ImuchpreferMrs.Peterson’slessons,由此可知,他喜欢彼得森女士的课,所以
最新回复
(
0
)