首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Commandl_Click() Dim nAs Long,SAs String n=InputBox("输入一个数") Do While n<>0 S=S&n Mod 10:s=s&n\
编写如下程序: Private Sub Commandl_Click() Dim nAs Long,SAs String n=InputBox("输入一个数") Do While n<>0 S=S&n Mod 10:s=s&n\
admin
2017-06-21
26
问题
编写如下程序:
Private Sub Commandl_Click()
Dim nAs Long,SAs String
n=InputBox("输入一个数")
Do While n<>0
S=S&n Mod 10:s=s&n\10 Mod 10
n=n\100
Loop
Print s
End Sub
程序运行后,单击命令按钮Commandl,并输入数值123456,则输出结果为
选项
A、654321
B、563412
C、642531
D、615243
答案
A
解析
本题在循环中先将n除以10的余数(即个位数字)连接到s上,然后将整除10后除以10的余数(即十位上数字)连接到s上,然后n整除100的值赋值给n(即去掉最后两位),然后继续进行循环,所以最终将会输出数字的逆序。
转载请注明原文地址:https://kaotiyun.com/show/WPGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在参数传递过程中,使用关键字来修饰参数,可以使之按值传递,此关键字是()
以下能够正确计算1+2+3+…+10的程序是
为了使列表框中的项目分为多列显示,需要设置的属性为()。
在设计程序时,应采纳的原则之一是()。
下面程序计算并输出的是PrivateSubCommand1_Click()a=10s=0Dos=S+a*a*aa=a-lLoopuntila
在窗体上画一个名称为Text1的文本框,一个名称为Command1的命令按钮,然后编写如下事件过程和通用过程:PrivateSubCommand1_Click()n=Val(Text1.Text)
在VisualBasic中,被称为对象的是
设有如下程序,查找并输出该数组中的最小值,请在空白处填上合适的代码,将程序补充完整。OptionBase1PrivateSubCommand1_Click()Dimarr1DimMinAsInteger,i
一个变量未被显式定义,末尾没有类型说明符,则该变量的隐含类型是______类型。
假定建立了一个工程,该工程包括两个窗体,其名称(Name属性)分别为Form1和Form2,启动窗体为Form1。在Form1上画一个命令按钮Command1,程序运行后,要求当单击该命令按钮时,Form1窗体消失,显示窗体Form2,请将下面的程序补充完
随机试题
心肌不会产生强直收缩,其原因是()
A.中心静脉压低,血压低B.中心静脉压高,血压低C.中心静脉压高,血压正常D.中心静脉压低,血压正常E.中心静脉压正常,血压高提示血容量相对不足()
A.EBVB.HTLV-1C.HHV-8D.幽门螺杆菌E.衣原体非洲儿童Burkitt淋巴瘤常伴感染的病原体是
被称为"无创性心血管造影"的心脏检查方法是
下列叙述有误的一项是()。
(2006年考试真题)根据《行政复议法》的规定,下列情形中,公民、法人或者其他组织可以申请行政复议的有()。
200的5%的5%是()
奥林匹克运动会的赞助商要想通过奥运会取得商业上的成功,仅仅在名片上增加“五环”或支起帐篷招揽游客是远远不够的。近15年来,作为奥林匹克运动会的全球性赞助商,VISA国际组织认为要想有效地利用这一全球最大的体育和文化盛事,并非只是简单的往奥运圣火里扔钱的活动
【B1】【B20】
A—employeesB—personnelC—payrollD—white-collarE—blue-collarF—managementandlaborG—compensationpayoutH—benefitsI—Headhun
最新回复
(
0
)