首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Dim num As Integer,r As Integer,n As Integer,i As Integer,arr(5)As Integer Private Sub Command l_Click()
编写如下程序: Dim num As Integer,r As Integer,n As Integer,i As Integer,arr(5)As Integer Private Sub Command l_Click()
admin
2020-01-02
58
问题
编写如下程序:
Dim num As Integer,r As Integer,n As Integer,i As Integer,arr(5)As Integer
Private Sub Command l_Click()
num=12:r=2
Call subl(num,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:arr(k)=d Mod r:d=d\r
Loop
End Sub
程序运行后,单击命令按钮Commandl,输出结果为
选项
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),在Commandl_Click()过程中调用完子过程对数组进行赋值以后,逆序输出了数组的值。
转载请注明原文地址:https://kaotiyun.com/show/fbTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
如图所示,在列表框List1中已经有若干人的简单信息,运行时在Text1文本框(即“查找对象”右边的文本框)中输入一个姓或姓名,单击“查找”按钮,则在列表框中进行查找,若找到,则把该人的信息显示在Text2文本框中。若有多个匹配的列表项,则只显示第1个匹配
在新建一个VB工程时,将新建窗体的Name属性设置为TheFirst,则默认的窗体文件名为()。
已知数组Dima(1To10)AsInteger,则下面正确调用GetValue函数的是()。PrivateFunctionGetValue(a()AsInteger)AsIntegerFori=1
()控件可以使图形根据控件大小而改变大小。
在窗体上画1个命令按钮,名称为Command1,然后编写如下程序:DimFlagAsBooleanPrivateSubCommand1_Click()DimintNumAsIntegerintNum=
窗体上有一个名称为optionl的单选按钮数组,程序运行时,当单击某个单选按钮时,会调用下面的事件过程PrivateSubOptionI_Click(IndexAsInteger)EndSub下面关于此过程的参数In
下面有关标准模块的叙述中,错误的是()。
下列叙述中有错误的是()。
(1)在名称为Form1的窗体上添加一个计时器控件,名称为Timerl。请利用属性窗口设置适当属性,使得在运行时可以每隔1秒,调用计时器的Timer事件过程一次。另外,请把窗体的标题设置为“题目2”。设计阶段的窗体如图3.73所示。(2)在名称为
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画两个文本框,其名称分别为Text1和Text2,内容分别为“文本框1”和“文本框2”,编写适当的事件过程。程序运行后,如果单击窗体,则
随机试题
鲁迅是20世纪中国伟大的思想家、文学家。下列属于其作品的有()。
焊割场地周围()范围内,各类可燃易爆物品应清理干净。
腹膜外位器官有
A.应激B.应对C.防御D.投射E.固着引起全身适应综合征的是
亚硝酸钠加入肉制品的主要作用是
根据施工质量控制的特点,施工质量控制应()。
关于明代内阁,下列表述正确的是()。
在财产保险中,除了海洋运输货物保险的保险利益时效有一定的灵活性之外,一般要求,保险合同在()存在保险利益。
在Word的页面视图方式下,在屏幕上看到的与打印出来的文稿(文字、图片、页眉、页脚等)布局格式()。
TheBeautyAdvantage[A]MostofushaveheardthestoryofDebrahleeLorenzana,the33-year-oldQueens,N.Y.,womanwhosuedCit
最新回复
(
0
)