首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序运行时,单击窗体则显示如图所示的图案。请去掉程序中的注释符,把程序中的?改为正确的内容。 注意:不能修改程序的其他部分和控件属性。最后将修改后的文件按原文件名存盘。 (2)在考生文件夹
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序运行时,单击窗体则显示如图所示的图案。请去掉程序中的注释符,把程序中的?改为正确的内容。 注意:不能修改程序的其他部分和控件属性。最后将修改后的文件按原文件名存盘。 (2)在考生文件夹
admin
2018-03-20
25
问题
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序运行时,单击窗体则显示如图所示的图案。请去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不能修改程序的其他部分和控件属性。最后将修改后的文件按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp,窗体中有一个矩形和一个圆,程序运行时,单击“开始”按钮,圆可以横向或纵向运行(通过选择单选按钮来决定),碰到矩形的边时,则向其相反方向运动,单击“停止”按钮,则停止运动,如图所示。可以通过选择单选按钮随时改变运动方向。
已经给出了所有控件和程序,但程序不完整,请去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不得修改已经存在的内容和控件属性,最后将修改后的文件按原文件名存盘。
选项
答案
(1)【操作步骤】 步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”将问号改为正确的内容。 参考答案 Private Sub Form Click()For i=1 To 5 ’输入5行 For j=1 To 6-i’循环实现输入空格,每行依次减少一个空格 Print" "; Next j For j=1 To 2 * 1-1 ’观察图像每行*的个数 Print "*"; Next j Print Next i For i=1 To 4 For j=1 To i+1 ’同问题1 Print " "; Next j For j=1 To (9-2 * i) ’同问题2 Print "*"; Next j Print Next i End Sub 程序结束 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 (2)【操作步骤】 步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,去掉程序中的注释符“f”,将问号改为正确的内容。 参考答案 Dim d As Integer Private Sub Command1_Click() Timer1.Enabled=True ’当单击"开始"按钮时,Timer生效 End Sub Private Sub Command2_Click() Timer1.Enabled=False’当单击"停止"按钮时,Timer失效 End Sub Private Sub Form_Load() d=1 End Sub Private Sub Timer1_Timer() If Option1 Then ’判断Option1是否被单击 Shape2.Top=Shape2.Top+d* 50’实现圆垂直移动 If Shape2.Top<=Shapel.Top Or Shape2.Top+Shape2.Width>=Shape1. Top+Shape1.Height Then ’判断Shape2与Shape1的位置 d=-d’当圆移出Shape1时,改变移动方向 End If ElseIf Option2 Then Shape2.Left=Shape2.Left+d * 50 ’实现水平移动 If Shape2.Left<=Shape1.Left Or Shape2.Left+Shape2.Width>=Shape1. Left+Shape1.Width Then d=-d ’当圆移出Shape1时,则改变移动方向 End If End If End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/pMGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
与传统的程序设计语言相比,VisualBasic最突出的特点是()。
滚动条的最小值属性是_________.最大值属性是__________。
以下关于过程及过程参数的描述中,错误的是______。
以下程序运行后输出的结果是______。OptionBase1PrivateSubForm_Click()DimA(20)ForK=1To20A(K)=K^2Ne
在窗体上有一个名为Text1的文本框和一个名为Commandl的命令按钮,并编写有如下事件过程:PrivateSubCommandlClick()DimiAsInteger,nAsIntegerFor
数据流图用于抽象描述一个软件的逻辑模型,数据流图由—些特定的图符构成。下列图符名标识的图符不属于数据流图合法图符的是______。
下列关于二叉树的叙述中,正确的是
数据库设计的四个阶段是:需求分析、概念设计、逻辑设计和
下面程序运行后,语句”Printi”执行的次数是()。PrivateSubForm_Click()DimiAsInteger,jAsIntegeri=0Doi=i+1Forj=10To1Step-3
深度为7的完全二叉树中共有125个结点,则该完全二叉树中的叶子结点数为
随机试题
(2019年临清)《中华人民共和国义务教育法》规定,县级以上地方人民政府有下列哪些行为之一的,可由上级人民政府责令限期改正;情节严重的,对直接负责的主管人员依法给予行政处分()
行政组织内部开展行政活动的规程是()
已知连续函数f(x)满足f(x)=x2+x∫01f(x)dx,则f(x)=().
有关膀胱造瘘的护理,描述错误的是
患者,男性,40岁。因2个月来发热、咳嗽、气短入院。已用青霉素,环丙沙星等治疗2周,症状无缓解并出现发绀。既往有血友病史,多次输血制品。体检:T38.9℃,颈部、腋下可触及直径约1cm左右的淋巴结,光滑无压痛,肺部可闻及湿性哕音。X线胸片显示间质性肺炎,
下列各项中,属于利得的有()。
下列政府对进口贸易的干预措施中,属于非关税壁垒的有()。
习近平指出,领导干部要不忘初心,坚守正道,必须坚定文化自信。没有中华优秀传统文化、革命文化、社会文化先进文化的底蕴和滋养,信仰信念难以深沉而执着。与这段话观点一致的是()
(北京航空航天大学2016年试题)Thefrontmatterofabookconsistsofthetitle,subtitle,tableofcontents,andpreface.Butthe【C1】____
ThoughiPadsandE-readershaveincreasinglybetterscreenclarity,theideathateverytimeapersonreadsabook,newspaperor
最新回复
(
0
)