首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp程序运行时,单击窗体则显示如图所示的图案。请去掉程序中的注释符,把程序中的?改为正确的内容。 注意:不能修改程序的其他部分和控件属性。最后将修改后的文件按原文件名存盘。 (2)在考生文件夹
(1)在考生文件夹下有一个工程文件sjt3.vbp程序运行时,单击窗体则显示如图所示的图案。请去掉程序中的注释符,把程序中的?改为正确的内容。 注意:不能修改程序的其他部分和控件属性。最后将修改后的文件按原文件名存盘。 (2)在考生文件夹
admin
2015-06-30
47
问题
(1)在考生文件夹下有一个工程文件sjt3.vbp程序运行时,单击窗体则显示如图所示的图案。请去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不能修改程序的其他部分和控件属性。最后将修改后的文件按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp,窗体中有一个矩形和一个圆,程序运行时,单击“开始”按钮,圆可以横向或纵向运行(通过选择单选按钮来决定),碰到矩形的边时,则向其相反方向运动,单击“停止”按钮,则停止运动,如图所示。可以通过选择单选按钮随时改变运动方向。
已经给出了所有控件和程序,但程序不完整,请去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不得修改已经存在的内容和控件属性,最后将修改后的文件按原文件名存盘。
选项
答案
(1)【操作步骤】 步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Private Sub Form_Click() ’ For i = 1 To ? For j = 1 To 6 - i Print " "; Next j ’ For j = 1 To ? Print "*"; Next j Print Next i For i = 1 To 4 ’ For j = 1 To ? Print " "; Next j ’ For j = 1 To ? Print "*"; Next j Print Next i End Sub 程序结束 参考答案 第1个?处填入:5 第2个?处填入:2 * i - 1 第3个?处填入:i + 1 第4个?处填入:(9 - 2 * i) 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 (2)【操作步骤】 步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Dim d As Integer Private Sub Command1_Click() Timer1.Enabled = True End Sub Private Sub Command2_Click() ’ ? = False End Sub Private Sub Form_Load() d = 1 End Sub Private Sub Timer1_Timer() If Option1 Then ’ Shape2.Top = ? + d * 50 ’ If Shape2.Top <= Shape1.? Or Shape2.Top + Shape2.Width >= Shape1.Top + Shape1.Height Then d = - d End If ElseIf Option2 Then ’ Shape2.Left = ? + d * 50 If Shape2.Left <= Shape1.Left Or Shape2.Left + Shape2.Width >= Shape1.Left + Shape1.Width Then d = - d End If End If End Sub 程序结束 参考答案 第1个?处填入:Timer1.Enabled 第2个?处填入:Shape2.Top 第3个?处填入:Top 第4个?处填入:Shape2.Left 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/9tQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
要选择多个不相领的控件,按住【】咸SHIFT键不放,再单击要选择的控件。
当文本框ScrollBars属性设置了非零值,却没有效果,原因是
如果在C盘当前文件夹下已经存在名称为Sdat.dat的顺序文件,那么执行语句Open"c:\Sdat.dat"ForAppendAs#1之后,将()。
下列程序中,a,b,c代表一个三角形的三条边,程序的作用是判断一个三角形是否成立,请填写空白处。Ifa+b<c______b+c<a______a+c<bThenMsgBox("这三条边不能构成一个三角形")EndIf
待排序的关键码序列为(33,18,9,25,67,82,53,95,12,70),要按关键码值递增的顺序排序,采取以第一个关键码为基准元素的快速排序法,第一趟排序后关键码33被放到第()个位置。
下面运行程序后,单击命令按钮,输出出的结果是【】。PrivateSubCommand1_Click()Dima%(1To5),i%,s#Fori=1To5
下列叙述中,不属于软件需求规格说明书的作用的是______。
下列程序的作用是求所有小于或等于30的自然数对。该程序不完整,请补充完该程序(程序执行结果见下图)。注:自然数对是指两个自然数的和与差都是平方数(如8与17)。PrivateSubCommand1_Click()
实体是信息世界中广泛使用的一个术语,它用于表示()
随机试题
Theoutsideworldbeginscreepingintotheschoolwhenthechildrenreachtheageof13andolder,theagewhentheybegintoma
舌强不能言,足废不能用,口干不欲饮,足冷面赤,脉沉细弱,宜选用
患者女,8岁。不自主的舞蹈样动作,语音不清,走路不稳,眼角膜边上形成黄绿色沉积环。该病可能与下列哪种元素代谢异常有关
A.2kcalB.4kcalC.7kcalD.9kcalE.11kcal
患儿女,2岁。流涕伴发热1天,发热38.5℃左右,今起出疹,由面颊迅速扩展到躯干四肢。T37.8℃,P112次/分,R50次/分。皮疹为红色斑丘疹,颜面、四肢皮疹较稀疏,背部皮疹较密集,有部分融合。咽充血,扁桃体稍大,充血。耳后及颈部数个淋巴结黄豆大小
患者,男性,72岁。吸烟指数1200,近半年有咳嗽,痰中带血丝,近2个月出现声嘶。查体:右锁骨上窝触及一肿大淋巴结,质硬,无压痛。则可能的诊断为
按照速度对称原理,下列情况中,属于商业银行资产运用不足的是()。
《香港特别行政区基本法》为香港社会的长治久安和繁荣发展提供了有力保障。下列有权修改《香港特别行政区基本法》的是()。
决策支持系统的特点之一是
ComputerandSchoolEducationTherewasatimewhenparentswhowantedaneducationalpresentfortheirchildrenwouldbuya
最新回复
(
0
)