首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_Click() Dim n As Long, s As String n = InputBox("输入一个数") Do While n 0 s = s & n Mod
编写如下程序: Private Sub Command1_Click() Dim n As Long, s As String n = InputBox("输入一个数") Do While n 0 s = s & n Mod
admin
2015-10-23
37
问题
编写如下程序:
Private Sub Command1_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、642531
D、615243
答案
A
解析
&为字符串连接函数。循环体取n的个位数,十位数,百位数组成字符串s。循环执行后s字串和输入的字串倒序。选A。
转载请注明原文地址:https://www.kaotiyun.com/show/xULp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在考生文件夹下有工程文件execise35.vbp及窗体文件execise35.frm。如下图所示,在名为Form1的窗体上有5个Labe1控件和2个命令按钮,数据文件in35.dat,存放考生的考号、姓名、成绩。要求:(1)自定义一个数据
在名为Form1的窗体上建立一个名为Text1的文本框,将MuRiLine属性设置为True,ScrollBars属性设置为2。再建立两个名称分别为Cmd1、Cmd2和Cmd3命令按钮,标题分别为“读数”、“排序”和“保存”,如下图所示。程序运行后
在考生文件夹中有一个工程文件execise37.vbp,相应的窗体文件为execise37.frm。在名为Form1的窗体上有一个名称为Cmd1,标题为“输出大于1000的整数之和”的命令按钮。其功能是产生40个0~2000的随机整数,放入一个数组中,然后
在考生文件夹中有文件execise66.vbp及其窗体文件execise66.frm。在名为Form1的窗体上建立一个名称为Text1的文本框;两个复选框,名称分别为Chk1和Chk2,标题分别为“足球协会”和“网络协会”。要求程序运行后,如果只选
在名为Form1的窗体上建立一个名为Text1的文本框,将MultiLine属性设置为True,ScrollBars属性设置为2。同时建立两个名称分别为Cmd1和Cmd2的命令按钮,标题分别为Read和Save(如下图所示)。
最简单的交换排序方法是______。
在窗体上建立通用对话框需要添加的控件是()。
设计软件结构是在软件生命周期的()。
软件生命周期中所花费用最多的阶段是
在C盘当前文件夹下建立一个名为SDat.txt的顺序文件。要求用InputBox函数输入5名学生的学号(StuNo)、姓名(StuName)和英语成绩(SmEng)。则在下列横线处合适的语句是()。PrivateSubForm_Click(
随机试题
某企业5年前获得一项专利,该专利法定寿命为10年,现对其价值进行评估。经专家估算,评估基准日其重置成本为100万元,尚可使用3年,则该项专利的评估值为()
IP地址就是域名,两者的功能是一样的。()
疑为骨盆骨折的患者来院急诊,首要的检查应是
施工单位投标中标后,与建设单位签订合同。在施工过程中,施工单位偷工减料,使用不合格的建筑材料。建设单位多次要求其返工处理,施工单位一直未予解决,因此导致合同纠纷。
运用股指期货等工具保护战略投资组合,以限制下跌的风险的投资方式是()。
对于财务关系的表述,不正确的是( )。
在家庭、社会与学校的联系中,起沟通桥梁作用的是()。
我国古代很多智慧结晶都表现在众多成语中。“蚍蜉撼树”“以卵击石”都表明实力相差悬殊的搏斗只能是以弱小的一方失败而告终。这个规律在今天的经济生活中同样实用。大企业无论在资金、人才、技术、信息等各个方面都有着小企业无法比拟的优势。所以,小企业若想生存,只能依托
空想社会主义“提供了启发工人觉悟的极为宝贵的材料”,但不是科学的思想体系。空想社会主义的局限性主要表现在()
Dealerswillquoteanarrowbid-askspreadforaparticularissueif______.
最新回复
(
0
)