首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序运行时,单击窗体则显示如图所示的图案。请去掉程序中的注释符,把程序中的?改为正确的内容。 注意:不能修改程序的其他部分和控件属性。最后将修改后的文件按原文件名存盘。 (2)在考生文件夹下有一
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序运行时,单击窗体则显示如图所示的图案。请去掉程序中的注释符,把程序中的?改为正确的内容。 注意:不能修改程序的其他部分和控件属性。最后将修改后的文件按原文件名存盘。 (2)在考生文件夹下有一
admin
2019-06-20
37
问题
(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*1)’同问题2 Print”*”; Next j Print Next i End Sub 程序结束 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 (2) 【操作步骤】 步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号改为正确的内容。 Dim d As Integer Private Sub Commandl_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 Timerl_Timer() If Optionl Then’判断Optionl是否被单击 Shape2.Top=Shape2.Top+d *50’实现圆垂直移动 If Shape2.Top<=Shape1.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/hSUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在考生文件夹下的“samp1.accdb”数据库文件中已建立表对象“tStud”和“tScore”、宏对象“mTest”和窗体“fTest”。请按以下要求,完成各种操作。(1)分析并没置表“tScore”的主键。(2)将学生“入校时间”
在考生文件夹下的“sampl.accdb”数据库文件中已建立3个关联表对象(名为“职工表”、“物品表”和“销售业绩表”)、一个窗体对象(名为“fTest”)和一个宏对象(名为“mTest”)。请按以下要求,完成表和窗体的各种操作。(1)分析表对象
在考生文件夹下有一个数据库文件“samp3.accdb”,里面已经没计好了表对象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。试在此基础上按照以下要求补允设计。(1)设置表对象“tEmp”中“年龄”字段的有效性规则
(1)考生文件夹下的工程文件sjt3.vbp中有1个名称为Label1的标签数组。程序运行时,单击“产生随机数”按钮,则在标签数组中显示随机数,如图3—21(a)所示。单击“数据反序”按钮,则把数组中的数据反序,如图3—21(b)所示。命令按钮的Click
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画1个名称为Label1的标签数组,含3个标签控件,下标从0开始,标签上的内容(按下标顺序)分别是:“等级考试”,“程序设计”,“VB程序”。运
为计算1+2+22+23+24+…+210的值,并把结果显示在文本框TeXtl中,若编写如下事件过程:PrivateSubCommand1_Click()Dima%,b%,i%s=1:a=2Fori=2To10a=a*2:b=b+aNex
以下关于局部变量的叙述中错误的是()。
为了使名称为Command1的命令按钮右移200,应使用的语句是()。
下列叙述中有错误的是()。
执行下面的程序段后,变量S的值为()。S=5Fori=2.6To4.9Step0.6S=S+1Nexti
随机试题
A.四级结构形成B.四级结构破坏C.一级结构破坏D.一级结构破坏E.二、三级结构破坏蛋白酶水解蛋白质时会出现
女性,48岁。5年前患右上肺结核,痰菌阳性,经异烟肼、链霉素和乙胺丁醇治疗6个月,痰菌转阴,病灶明显吸收,自行停药,未再随访。近1月来感乏力,2天前起咳嗽,痰中带血就诊。X线胸片示右上肺大片致密影,边缘不清,密度不均,高密度病灶部分约见有钙化。侧位病变位于
患者,女,40岁。双手指及腕关节肿痛3个月,伴晨僵。查血沉56mm/h,类风湿因子1:80。必要的检查首先是
图5-64所示正方形截面等直杆,抗弯截面为W,在危险截面上,弯矩为M,扭矩为Mn,A点处有最大正应力σ和最大切应力τ。若材料为低碳钢,则其强度条件为()。
计划性风险自留的计划性主要体现在( )方面。
会计核算软件按服务层次和提供信息的深度可分为单用户会计核算软件和多用户(网络)会计核算软件。()
根据规定,投资人申请设立个人独资企业,应当向登记机关提交的文件有()。
有权制定税收部门规章的税务主管机关是财政部、国家税务总局。()
在弗洛伊德的心理发展阶段理论中,“恋母情结”现象出现在()
Themainideaofthispassageis______.
最新回复
(
0
)