首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Dim ilum As Integer,r As Integer,n As Integer,i As Integer,art(5)As Integer Private Sub Command1_Click() num
编写如下程序: Dim ilum As Integer,r As Integer,n As Integer,i As Integer,art(5)As Integer Private Sub Command1_Click() num
admin
2019-06-11
31
问题
编写如下程序:
Dim ilum As Integer,r As Integer,n As Integer,i As Integer,art(5)As Integer
Private Sub Command1_Click()
num=12:r=2
Call subl(num,r,n)
For i=n To 1 Step -1
Print art(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
程序运行后,单击命令按钮Command1,输出结果为
选项
A、1 1 0 0
B、0 0 1 1
C、0 1 0 1
D、1 0 1 0
答案
A
解析
本题实际上是在子过程subl中对arr数组进行的赋值工作,形参d的值为12,r的值为2,k的初值为0;在循环中计算d除以2的余数放到数组的第一个元素,整除2后再除以2的余数放到第二个元素……以此类推,最后数组arr中存放的是(0、0、1、1),在Command1_Click()过程中调用完子过程对数组进行赋值以后,逆序输出了数组的值。
转载请注明原文地址:https://kaotiyun.com/show/U3Up777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有如下程序:PrivateSubForm_Click()DimsAsInteger,pAsIntegerp=1Fori=1To4Forj=1Tois=s+jNe
窗体上有一个由两个文本框组成的控件数组,名称为Text1,并有如下事件过程:PrivateSubText1_Change(IndexAsInteger)SelectCaseIndexCase0Text1
设a=4,b=5,c=6,执行语句Printa
窗体上有一个名称为Text1的文本框,一个名称为CD1的通用对话框,一个标题为“打开文件”的命令按钮,如图所示。命令按钮的单击事件过程如下:PrivateSubCommand1_Click()CD1.ShowOpenOpen
窗体上有一个名称为Eramel的框架(如图),若要把框架上显示的“Framel”改为汉字“框架”,下面正确的语句是()。
下列VisualBasic变量名中,正确的是()。
下列对数据库的描述中不正确的是()。
(1)在考生文件夹下有一个工程文件sjt3.vbp,其窗体上有一个列表框和一个标题为“选择”的命令按钮,且列表框中已有若干列表项。程序的功能是:当单击”选择”按钮时,如果列表框中没有列表项,则程序不做任何操作。否则,判断列表框中是否有列表项被选中,如果没有
用户在组合框中输入或选择的数据可以通过一个属性获得,这个属性是()。
表达式4+5\6*7/8Mod9的值是()。
随机试题
某地1991~1995年床位发展情况如下:1995年的环比增长速度为
各种会计核算形式下,明细账的登记依据有()。
外汇储蓄账户内外汇汇出境外当日累计等值()美元以下(含)的,凭本人有效身份证件在银行办理。
根据支付结算法律制度的规定,下列非现金支付工具中,属于结算方式的有()。(2012年)
美国当代生物社会学家威尔逊把“基因复制”看做是决定人的一切行为的本质力量,这一观点属于教育学上的()
请认真阅读下列材料,并按要求作答。简要分析歌曲特点。
Duringvolcanic______,darkcloudsofsmokefillthesky,bringingfearstolocalresidents.
检查软件产品是否符合需求定义的过程称为()。
程序流程图中带有箭头的线段表示的是( )。
CarpentryAssociationofVermontPresentswoodworkingcourses,June2toJuly6attheEvergreenCommunityCenterAcertificate
最新回复
(
0
)