首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command 1_Click() Dim n As Long,S As String n=InputBox("输入一个数") Do While n0 S=S&n Mod 10:S=S&n\10 Mod 1
编写如下程序: Private Sub Command 1_Click() Dim n As Long,S As String n=InputBox("输入一个数") Do While n0 S=S&n Mod 10:S=S&n\10 Mod 1
admin
2015-05-29
56
问题
编写如下程序:
Private Sub Command 1_Click()
Dim n As Long,S As 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
程序运行后,单击命令按钮Command1,并输入数值123456,则输出结果为
选项
A、654321
B、563412
C、64253l
D、615243
答案
A
解析
小题在循环中先将n除以10的余数(即个位数字)连接到s上,然后将整除10后除以10的余数(即十位上数字)连接到s上,然后n整除100的值赋值给n(即去掉最厉两位),然后继续进行循环,所以最终将会输出数字的逆序。
转载请注明原文地址:https://kaotiyun.com/show/YDQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设a="a",b="b",c="c",d="d",执行语句x=IIf((a<B)Or(c>D),"A","B")后,x的值为
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()x=InputBox("Input")SelectCasexCase1,
设有程序:OptionBase1PrivateSubCommand1Click()Dimarrl,MaxasIntegerarrl=Array(12,435,76,24,78,54,866,43)
一个类可以从直接或间接的祖先中继承所有属性和方法。采用这个方法提高了软件的【】
在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序:PrivateSubCommand1_Click()StaticXAsIntegerStaticYAsIntegerCls
线性表的顺序存储结构和线性表的链式存储结构分别是
如图所示,在列表框List1中已经有若干人的简单信息,运行时在Text1文本框(即“查找对象”右边的文本框)输入一个姓或姓名,单击“查找”按钮,则在列表框中进行查找,若找到,则把该人的信息显示在Text2文本框中。若有多个匹配的列表项,则只显示第1个匹配项
下列各选项说法错误的一项是
为了在列表框中使用<Ctrl>和<Shift>键进行多个列表项的选择,应将列表框的MultiSelect属性设置为()。
在一个窗体上添加一命令按钮控件,名为Command1,事件过程如下,则执行结果是()。OptionBase1PrivateSubCommand1_Click()Dima(5)AsIntegerDimk
随机试题
班主任工作的中心环节是()。
A.奇脉B.交替脉C.水冲脉D.短绌脉提示房颤
A.只用于术前放疗或术后放疗患者B.只用于单纯放疗或姑息放疗患者C.术后放疗患者D.只用于术前放疗患者E.术前放疗、术后放疗、单纯放疗或姑息放疗患者食道癌前后对穿野用于
A.柴胡疏肝散B.调营饮C.附子理中汤合五苓散D.一贯煎合猪苓汤E.胃苓汤治疗肝硬化脾肾阳虚证,应首选
A、±7.5%B、±5%C、3%D、0.1%~1%E、0.1%~3%中国药典规定片重≥0.3g的片剂的重量差异限度为
化工装置停车后,对设备内可燃物的沉积物,可以用人工铲刮的方法予以清除。清除作业应使用()工具。
基本会计车间使用的固定资产,所计提的折旧应计入制造费用,并最终进入产品的生产成本。()
在期权合约中,()是期权合约中唯一能在交易所内讨价还价的要素,其他合约要素均已标准化。
宏观经济发展的总体目标包括( )。
FormostpeopleBritain’sbouncingeconomy,nowgrowingatitsfastestforthreeyears,iscauseforcheer.Not,【C1】______forth
最新回复
(
0
)