首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_Click() Dim n As Long,s As String n=InputBox("输入一个数") Do While n0 Print n\10
编写如下程序: Private Sub Command1_Click() Dim n As Long,s As String n=InputBox("输入一个数") Do While n0 Print n\10
admin
2017-04-25
24
问题
编写如下程序:
Private Sub Command1_Click()
Dim n As Long,s As String
n=InputBox("输入一个数")
Do While n<>0
Print n\10 Mod 10::Print n Mod 10::n=n\100
Loop
Print s
End Sub
程序运行后,单击命令按钮Command1,并输入数值123456,则输出结果为
选项
A、6 5 4 3 2 1
B、5 6 3 4 1 2
C、6 4 2 5 3 1
D、6 1 5 2 4 3
答案
B
解析
本题中是在一个Do循环中对一个数字进行分解,首先输出该数字整除10之后再除以10得到的余数(即十位上数字),然后输出该数除以10得到的余数(即个位数字),然后将该数去掉十位和个位上的数字以后继续循环,最终依次输出5、6、3、4、1、2。
转载请注明原文地址:https://kaotiyun.com/show/JQGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序段的执行结果为______。DimA(10,10)Fori=2To4Forj=4To5A(i,j)-i*jNextjNextiPrintA(2,5)+A(3,4)+A(4
要设置窗体为固定对话框,并包含控制莱单栏和标题栏,但没有最大化和最小化控钮,设置的操作是
在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Label1和Command1,然后编写如下两个事件过程:PrivateSubCommand1_Click()strText=InputBox("请输入"
在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程;OptionBase0PrivateSubCommand1_Click()DimcityAsVariantcity=Array("北
能够获得一个文本框中被选取文本的内容的属性是______。
在窗体上画一个名称为Combol的组合框,画两个名称分别为Label1和Label2及Caption,属性分别为“城市名称”和空白的标签。程序运行后,当在组合框中输入一个新项后按回车键(ASCII码为13)时,如果输入的项在组合框的列表中不存在,则自动添加
在窗体上画一个文本框,然后编写如下事件过程:PrivateSubText1_KeyPress(KeyAsciiAsInteger)DimcharAsStringchar=Chr(KeyAscii)
设有以下循环结构;Do循环体LoopWhile<杂件>则以下叙述中错误的是______。
在面向对象的程序设计中,下列叙述错误的是______。
下列程序段错误的是()。
随机试题
A.营养性缺铁性贫血B.溶血性贫血C.营养性巨幼细胞贫血D.急性失血性贫血E.营养性混合性贫血MCV<80fl,MCHC<32%,红细胞中央苍白区扩大,骨髓中幼红细胞胞质发育落后于胞核
组成十二指肠液的是
A.吗啡B.青霉素C.酒精D.对乙酰氨基酚E.地高辛长期使用易产生身体依赖性的药物是
糯米较难消化的原因是其含较多的
有关合同担保的说法中正确的是()Ⅰ.合同担保可由当事人本人做出Ⅱ.合同担保可由第三方做出Ⅲ.合同担保必须由第三方做出Ⅳ.合同担保可由公民个人和国家机关做出
信用卡销户时,单位卡账户的余额应( )。
获取与分析资料期间,应避免的是()。
某电视台为了了解本地区电视节目的收视率情况,对部分观众开展了“你最喜爱的电视节目”的问卷调查(每人只填写一项),根据收集的数据绘制了下面两幅不完整的统计图.请你按要求回答下列问题:现有喜欢“新闻节目”(记为A)、“体育节目”(记为B)、“综艺节目”
文件的存取方式是由文件的性质和用户使用文件的情况而定的,一般可以采用顺序存取和随机存取两种形式。顺序存取是按照文件的______地址顺序存取的。
Technology,Costs,LackofAppealSlowE-TextbookAdoption[A]TextbooksareoftenaluxuryforcollegeseniorVatellMartin.The
最新回复
(
0
)