首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Dim num As Integer,r As Integer,n As Integer,i As Integer,arr(5)As Integer Private Sub Command1_Click() num=12:r=2 Call
编写如下程序: Dim num As Integer,r As Integer,n As Integer,i As Integer,arr(5)As Integer Private Sub Command1_Click() num=12:r=2 Call
admin
2019-07-30
46
问题
编写如下程序:
Dim num As Integer,r As Integer,n As Integer,i As Integer,arr(5)As Integer
Private Sub Command1_Click()
num=12:r=2
Call sub1(num,r,n)
For i=n To1Step-1
Print arr(i);
Next i
End Sub
Sub sub1(d As Integer,r As Integer,k As Integer)
k=0
Do While d<>0
k=k+1:arr(k)=d Mod r:d=d\r
Loop
End Sub
程序运行后,单击命令按钮Command1,输出结果为
选项
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://kaotiyun.com/show/2iUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设a=10,b=5,c=1,执行语句Printa>b>c窗体上显示的是
设a=4,b=5,c=6,执行语句Printa
若窗体上的图片框中有一个命令按钮,则此按钮的Left属性是指
通用对话框Filter属性的作用是
在利用菜单编辑器设计菜单时,为了把组合键“Alt+X”设置为“退出(X)”菜单项的访问键,可以将该菜单项的标题设置为
工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是:PublicxAsIntegerPrivateyAsInteger窗体文件的程序代码是:DimaAsIntegerPrivateS
下面不能作为结构化方法软件需求分析工具的是
关于自定义数据类型,下面叙述中不正确的是()。
(1)在考生文件夹下有一个工程文件sjt3.vbp,含有两个窗体,名称分别为Form1、Form2。其中Form1上有两个控件(图像框和计时器)和一个菜单项“操作”,含有三个子菜单(如图1所示)。Form2上有一个名称为Command1、标题为“返回”的命
要使菜单项MenuOne在程序运行时失效,应使用的语句是()。
随机试题
Oneoftheworld’soldestandmostfamousstatuesmaynot【C1】______muchlongerunlessstepsare【C2】______tosaveit.Thehugef
下列可引起性传播疾病的病原体是
关于成骨肉瘤下列特征中,哪项不准确
患者,男性,41岁。3天前弯腰抬重物时突发腰痛。查体:腰骶部压痛,右直腿抬高试验阳性,小腿前外侧和足内侧痛、触:觉减退,踝及趾背伸力下降,该患者受累的神经根为
A.急性闭角性青光眼B.急性单纯疱疹性角膜炎C.沙眼D.睑腺炎E.老年性白内障在老年人中,可引起慢性视力下降的常见眼病是
生产经营单位的主要负责人依照生产经营单位相关责任规定受刑事处罚或者撤职处分的,自刑罚执行完毕或者受处分之日起,( )内不得担任任何生产经营单位的主要负责人。
被称为“口袋房,曼子炕”的是()的民居形式。
【2016年上】我国不同民族室内装饰与居住环境各有特色。下图的民居室内装饰反映的民族特色是()。
【2014年河北省第42题】从2000到6000的自然数中,不含数字5的自然数有多少个?
Preschoolers’InnateKnowledgeMeansTheyCanProbablyDoAlgebraChilddevelopmentspecialistsareuncoveringevidencethat
最新回复
(
0
)