首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生目录下有一个工程文件sjt4.vbp。程序的功能是,单击“产生随机数”按钮可以产生10个随机数放到数组中并显示在图片框中,在文本框中输入一个小于10的正整数m,单击“移动数据”按钮,可以把数组中的前m个数据移动到后面去,并显示在图片框中。如图所示。
在考生目录下有一个工程文件sjt4.vbp。程序的功能是,单击“产生随机数”按钮可以产生10个随机数放到数组中并显示在图片框中,在文本框中输入一个小于10的正整数m,单击“移动数据”按钮,可以把数组中的前m个数据移动到后面去,并显示在图片框中。如图所示。
admin
2018-12-20
23
问题
在考生目录下有一个工程文件sjt4.vbp。程序的功能是,单击“产生随机数”按钮可以产生10个随机数放到数组中并显示在图片框中,在文本框中输入一个小于10的正整数m,单击“移动数据”按钮,可以把数组中的前m个数据移动到后面去,并显示在图片框中。如图所示。
在给出的窗体文件中已经有了全部控件,但程序不完整。
要求:去掉程序中的注释符,把程序中的?改为正确的内容。最后把修改后的文件按原文件名存盘。
选项
答案
[操作步骤] 步骤1:打开本题项目工程 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号改为正确的内容。 参考代码(画下划线部分是需填入的内容) Dim a%(1 To 10) Private Sub Command1 C1ick() Randomize For k=1 To 10 a(k)=Int(Rnd*90+10) Picture1.Print a(k); Next k picture1.Print picture1.Print"----------------------------------" End Sub Private Sub Command2_Click() m%=Val(Text1) NoveArray a(),
m
For k=1 To 10 Picture1.Print a(k); Next k Picture1.Print End Sub Sub NoveArray(a()As Integer,m As Integer) n%=UBound(a) For k=1 To
m
x=a(1) For j=1 To n-1 a(j)=a(
j+1
) Next j a(n)=
x
Next k End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/3kFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1),程序运行后,在文本框中每输入一个字符,都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是( )。
决定标签内容显示位置的属性是
用语句Open"C:\teac.txt"ForInputAs#1打开文件后,就可以编程序
VisualBasic中的"启动对象"是指启动VisualBasic应用程序时,被自动加载并首先执行的对象。下列关于VisualBasic"启动对象"的描述中,错误的是( )。
窗体上有一个名称为VScroll1的垂直滚动条,为了设定单击滚动条两端箭头时的Value增量值,应设置的属性是
下列链表中,其逻辑结构属于非线性结构的是
设循环队列存储空间为Q(1:50)。初始状态为front=rear=50。经过一系列入队和退队操作后,front=14,rear=19,则该循环队列中的元素个数为
结构化程序设计中,下面对goto语句使用描述正确的是
窗体上有一个名称为HScrolll的滚动条,程序运行后,当单击滚动条两端的箭头时,立即在窗体上显示滚动框的位置(即刻度值)。下面能够实现上述操作的事件过程是
随机试题
A.虫媒病毒B.副黏病毒C.正黏病毒D.小核糖核酸病毒E.柯萨基病毒流行性腮腺炎
一健康小儿体重14kg,身长90cm,其年龄约为
在工程量清单的清单计价表格中,()的内容包括暂列金额。
当地基计算沉降过大或结构物对不均匀沉降敏感时,可采用()。
施工项目管理规划实施规划内容中技术组织措施计划应包括:保证质量和安全目标的措施、()。
下列案件中,属于税务行政处罚听证的范围是()。
甲、乙两车分处A、B两地,速度大小保持不变,相向而行时,2小时后相遇,同向而行时,30小时后,甲车追上乙车。问甲车将速度降低多少后,两车速度相等?
[2006年]在xOy坐标平面上,连续曲线l过点M(1,0),其上任意点P(x,y)(x≠0)处的切线斜率与直线OP的斜率之差等于ax(常数a>0).求l的方程;
检索每门课程的最高分,要求得到的信息包括课程名称、姓名和最高分,正确的命令是( )。为“课程”表中定义“开课系名”字段的默认值为“中文”,正确的命令是( )。
Readthearticlebelowaboutthecustomerretention.ChoosethebestwordtofilleachgapfromA,B,CorDontheoppositep
最新回复
(
0
)