首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生目录下有一个工程文件sjt4.vbp。程序的功能是,单击“产生随机数”按钮可以产生10个随机数放到数组中并显示在图片框中,在文本框中输入一个小于10的正整数m,单击“移动数据”按钮,可以把数组中的前m个数据移动到后面去,并显示在图片框中。如图所示。
在考生目录下有一个工程文件sjt4.vbp。程序的功能是,单击“产生随机数”按钮可以产生10个随机数放到数组中并显示在图片框中,在文本框中输入一个小于10的正整数m,单击“移动数据”按钮,可以把数组中的前m个数据移动到后面去,并显示在图片框中。如图所示。
admin
2019-06-11
58
问题
在考生目录下有一个工程文件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/GNUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下程序:PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=10:y=20Callfun1(x,y)Printx;yEndSubPrivateFunctionf
有下面程序代码:PrivateSubCommand1_Click()DimxAsInteger,SAsIntegerx=1Fork=1To3x=x+1:procx:s===s+xNextkPrintsEndSubP
求1!+2!+……+10!的程序如下:PrivateFunctions(xAsInteger)f=1Fori=1Toxf=f*iNexts=fEndFunctionPrivateSubCommand1_Click()Di
在窗体上画一个命令按钮,名称为Command1,然后编写如下代码:OptionBase0PrivateSubCommand1_Click()DimA1(4)AsInteger,A2(4)AsIntegerFork=0To2A1(k+
命令按钮Command1的MouseUp事件过程结构如下:PrivateSubCommand1_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)EndSub则
窗体上有一个名称为Option1的单选按钮数组,程序运行时,当单击某个单选按钮时,会调用下面的事件过程PrivateSubOption1_Click(IndexAsInteger)EndSub下面关于此过程的参数Index的叙述中正确的是
设有如下数组定义语句:Dima(-1To4,3)AsInteger以下叙述中正确的是
设a=2,b=3,c=4,d=5,表达式Nota<=cOr4*c:b^2Andb<>a+c的值是
下列选项中不属于面向对象程序设计特征的是
设程序中有以下语句:MsgBox"Visual",,"Basic","等级考试",2执行该语句后,显示一个信息框,以下关于该信息框的叙述中,正确的是
随机试题
关于多层螺旋CT探测器的描述,错误的是
患者心烦不寐,心悸不安,头晕,耳鸣健忘,腰酸梦遗,五心烦热,口干津少,舌红,脉细数。其治法是
非固定销售货物或者应税劳务,应当向()的主管税务机关申报纳税。
下列说法中,正确的有()。
对于监督检查部门在监督检查不正当竞争行为时的职权,下列描述正确的是( )。
教育的心理起源说否认了教育的()。
西部某省经济和医疗卫生条件都比较落后。该省卫生部门领导一直设想在该省大力推广中医,培养中西医结合的医师。并让全省所有医生学会真气运行法,免费向患者传授,以此扩大基础医疗覆盖面,同时,减少群众医疗开支。该领导上任之后,对该省的医疗卫生事业采取了一系
下列关于法律规则的论述,正确的是()。
toovercome
TheGreatLymeDebateThere’sadebateragingoverLymedisease,althoughyou’dneverknowitunlessyou’vebeenpayingclose
最新回复
(
0
)