首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Dim num As Integer,r As Integer,n As Integer,i As Integer,arr(5)As Integer Private Sub Command 1 Click() num=12:r=2
编写如下程序: Dim num As Integer,r As Integer,n As Integer,i As Integer,arr(5)As Integer Private Sub Command 1 Click() num=12:r=2
admin
2019-07-30
19
问题
编写如下程序:
Dim num As Integer,r As Integer,n As Integer,i As Integer,arr(5)As Integer
Private Sub Command 1 Click()
num=12:r=2
Call sub1(hum,r,n)
For i=n To 1 Step.1
Print arr(i);
Next i
End Sub
Sub sub 1(d As Integer,r As Integer,k As Integer)
k=0
Do While d<>0
k=k+1:art(k)=d Mod r:d=d\r
Loop
End Sub
程序运行后,单击命令按钮Command 1,输出结果为
选项
A、1 1 0 0
B、0 0 1 1
C、0 1 0 1
D、1 0 1 0
答案
A
解析
本题实际上是存子过程sub1中对arr数组进行的赋值工作,形参d的值为12,r的值为2,k的初值为0;在循环中计算d除以2的余数放到数组的第一个元素,整除2后再除以2的余数放到第二个元素……以此类推,最后数组arr中存放的是(0、0、1、1),住Command1 Click()过程中调用先完子过程对数组进行赋值以后,逆序输出了数组的值。
转载请注明原文地址:https://jikaoti.com/ti/NpN0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有名称为Command1的命令按钮和名称为Text1的文本框PrivateSubCommand1_Click()Text1.Text="程序设计"Text1.SetFocusEndSubPriv
设窗体上有一个Text1文本框和一个HScroll1水平滚动条,并有下面的事件过程:PrivateSubHScroll1_Change()Text1=HScroll1EndSub在程序运行时,当把滚动框移动到最
设x=4,y=6,则以下不能在窗体上显示出“A=10”的语句是
在窗体上画一个文本框,名称为Text1,然后编写如下程序:PrivateSubFormLoad()PrivateSubFormClick()Text1.Text="":Text1.SetFocus
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。窗体文件的程序如下:PrivateTypexPrivateSubCommand1_Click()a
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()c=1234c1=Trim(Str(c))Fori=1To4Print
设有如下通用过程:PublicFunctionFun(xStrAsString)AsStringDimtStrAsString.strLAsIntegertStr=""strL=Len(xStr)i=1
在窗体上画1个名称为Command1的命令按钮,并编写如下事件过程:PrivateSubCommand1_Click()x=1:s=0Fori=1To5x=x/i:s=s+xNextPr
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:OptionBase1PrivateSubCommand1_Click()d=0:c=10:x=Array(10,12,21,32,24)For
决定标签内容显示位置的属性是
随机试题
患者久病体弱,积块坚硬,隐痛或剧痛,饮食大减,肌肉瘦削,神倦乏力,面色萎黄或黧黑,甚则面肢浮肿,舌质淡紫,或光剥无苔,脉细数或弦细。治宜选用
肺癌空泡形成的病理基础是
A.曲马多B.美沙酮C.司可巴比妥D.麦角新碱属于麻醉药品的是
法院在刑事案件的审理过程中,根据对案件的不同处理需要使用判决、裁定和决定。请根据有关法律规定及刑事诉讼原理,回答下列问题。关于一个案件中适用判决、裁定、决定的数量,下列选项正确的是:
防雷装置:
名镇和名村保护规划成果的组成包括()
甲公司是一家中低端护肤品生产企业,为适应市场需求,2020年末拟新建一条高端护肤品生产线,项目期限5年。相关资料如下:(1)新建生产线需要一栋厂房、一套生产设备和一项专利技术。新建厂房成本5000万元,根据税法相关规定,按直线法计提折旧,折旧年限
[2004年MBA真题](1)一(2)基于以下题干:张教授:在我国大陆架外围海域建设新油井的计划不足取,因为由此带来的收益不足以补偿由此带来生态破坏的风险。目前我国每年海底石油的产量,还不能满足我国一天石油的需求量,而上述拟建中的新油井,最多只能使这个数量
循环队列的存储空间为Q(1:100),初始状态为front=rear=100。经过一系列正常的入队与退队操作后,front=rear=99,则循环队列中的元素个数为()。
HowtoBuildYourVocabularyEffectivelyVocabularyisthefoundationoflearningalanguage.Withoutit,noneoftheski
最新回复
(
0
)