首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: 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
58
问题
编写如下程序:
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全国计算机二级
相关试题推荐
窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。设有如下的类型声明:TypePersonnameAsString*8majorAsString*20EndType
为了实现鼠标自动拖放,必须把()属性设置为1;而为了执行手动拖放,必须把该属性设置为0。
在窗体上用复制、粘贴的方法建立了一个命令按钮数组,数组名为ComTestl。设窗体Form1标题为“MyForm1”,双击控件数组中的第3个按钮,打开代码编辑器,编写如下代码:PrivaeSubComTestl_Click(IndexAsI
如图所示,在窗体上有一个文本框控件,名称为TextTime;一个计时器控件,名称为Timer1。要求每1s在文本框中显示一次当前的时间。PrivateSubTimer1TextTime.Text=TimeEndSub在下划线上应填入
下列程序的功能是调用字体对话框来设置文本框中的字体,单击Command1按钮弹出对话框,进行相应的字体、字号等的设置,然后单击“确定”按钮退出对话框,则文本框中将发生哪些变化()。PrivateSubCommand1_Click()
下面4个选项中,不是窗体属性的是()。
下列选项中,不属于模块间耦合的是()。
(1)考生文件夹下有一个工程文件sjt3.vbp。程序的功能是:通过键盘向文本框中输入数字,如果输入的是非数字字符,则提示输入错误,且文本框中不显示输入的字符。单击名称为Command1、标题为“添加”的命令按钮,则将文本框中的数字添加到名称为Combol
以下VisualBasic不支持的循环结构是
下列与队列结构有关联的是
随机试题
下列有关原发性肺结核的描述,正确的是
A.触摸大动脉搏动B.观察瞳孔是否散大固定C.同步直流电除颤D.非同步直流电除颤E.人工呼吸,胸按压判断心搏骤停最简便的方法是
关于特殊解毒药的适应证A、依地酸钙钠B、二巯丁二钠C、亚甲蓝D、乙酰半胱氨酸E、谷胱甘肽用于铅,锰、铜、镉等中毒,尤以铅中毒疗效好的是
下列关于甲、乙、丙之间关系的何种表述是正确的?()。如果甲与不知情的丁在第35日签订了买卖合同,则()。
项目盈亏平衡分析中,若其他条件不变,可以降低盈亏平衡点产量的途径有()。
依据增值税的有关规定,下列行为中属于增值税征税范围的是()。
甲公司2011年12月3日与乙公司签订产品销售合同。合同约定,甲公司向乙公司销售A产品400件,单位售价650元(不含增值税),增值税税率为17%:乙公司应在甲公司发出产品后1个月内支付款项,乙公司收到A产品后3个月内如发现质量问题有权退货。A产品单位成本
赵某从某一超市买了某肉联厂的熟食罐头,吃过罐头后食物中毒,花去医药费数万元。后来法院查明,罐头是超市委托给运输公司托运的,而该运输公司在运输过程中没有采取冷冻措施,致使罐头变质,赵某可以请求()承担民事责任。
道德不是千古不变的,同其他社会意识形态一样,道德也有自己的发生发展过程。下列关于道德发展规律的表述错误的是()
计算下列二重积分:计算xydxdy,其中D={(x,y)|y≥O,x2+y2≤1,x2+y2≤2x}.
最新回复
(
0
)