首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Pfivme Sub Command1_Click() Dim nAs Long,SAs String n=InputBox(”输入一个数”) Do While n0 s=S&n Mod 10
编写如下程序: Pfivme Sub Command1_Click() Dim nAs Long,SAs String n=InputBox(”输入一个数”) Do While n0 s=S&n Mod 10
admin
2020-01-02
68
问题
编写如下程序:
Pfivme Sub Command1_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
程序运行后,单击命令按钮Command1,并输入数值123456,则输出结果为
选项
A、654321
B、563412
C、642531
D、615243
答案
A
解析
本题在循环中先将n除以10的余数(即个位数字)连接到s上,然后将整除10后除以10的余数(即十位上数字)连接到s上,然后n整除100的值赋值给n(即去掉最后两位),然后继续进行循环,所以最终将会输出数字的逆序。
转载请注明原文地址:https://kaotiyun.com/show/mbTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
()控件可以使图形根据控件大小而改变大小。
窗体上有1个名为List1的列表框,其中已经输入了若干个项目(如图所示);还有2个文本框,名称分别为Text1、Text2,1个名称为conunandl的命令按钮,并有以下程序。PrivateSubCommand1_Click()
结构化程序设计的3种结构是()。
在考生文件夹下有一个工程文件sjt5.vbp,窗体上有两个命令按钮,标题分别是“读数据”和“统计”,请添加一个名称为Label1、标题为“回文个数为”的标签和一个名称为Text1,初始内容为空的文本框,如图所示。程序功能如下:①单击“读数据”按
(1)在名称为Form1的窗体上添加一个名称为Shape1的形状控件,通过设置参数使其形状为圆形;添加一个名称为Label1的标签,标题为“形状”,标签的大小能够根据标签内容的字数、大小而定;添加一个名称为Text1的文本框,文本框最多能够显示5个字符,文
以下数列:1,1,2,3,5,8,13,21…的规律是从第3个数开始,每个数都是其前面两个数之和。在考生文件夹下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如图所示。请编写适当的事件过程完成如下功能:选中一个单选按钮后,单击“计算”
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个标签,名称为L1,标题为“业余爱好”,再画一个名称为Ch1的复选框数组,含三个复选框,它们的Index属性分别为0、1、2,标题依
VB中,若没有显式声明变量的数据类型,则默认的类型是
有如下语句序列:Dima,bAsIntegerPrintaPrintb执行以上语句序列,下列叙述中错误的是
假定有以下循环结构DoUrntil条件循环体Loop则正确的描述是()。
随机试题
周丽从四川来京打工,2001年8月被一家个体餐馆招为厨房勤杂工,双方口头约定周丽每月的工资450元,另外,餐馆每天免费提供两顿饭,如发生其他费用,餐馆概不负责。2002年3月,由于连日加班,周丽在切肉时不小心把左手食指切断,为接指花去医药费5000元。周丽
生态系统在单位时间、单位面积上的有机物质产量称为()
A.PSG检查睡眠时,口鼻气流停止时,记录不到膈肌和胸壁肌活动B.PSG检查睡眠时,口鼻气流停止时,膈肌和胸壁肌活动明显C.PSG检查睡眠时,最低血氧低于80%D.PSG检查睡眠时,RD124,血氧89%E.PSG检查睡眠时,RD1>20,血氧>9
图中从左到右的屋顶形式的称谓分别是()
硬质聚氯乙烯给水管道连接一般有()。
为了更好地管理客户信息、供应商信息结算资金,企业可以同时使用应收/应付款核算模块。()
下列各项中,()不属于记账凭证的基本要素。
东北地形分布很有规律,由半环状向南敞开的三个地带组成,由外至内分别是()。
一元二次方程ax2+bx+c=0(a≠0)有两个不相等的实根,则b2一4ac满足的条件是().
actor本题考查考生对于具体细节信息的听辨能力。原句为“Onedayin1979,whilewaitingforatiretobechanged,hetookpicturesofayoungactorfriendhe
最新回复
(
0
)