编写如下程序： Private Sub Command1_Click() Dim n As Long，s As String n=InputBox("输入一个数") Do While n＜＞0

admin2019-06-20 58

问题编写如下程序：
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、654311
B、563412
C、642531
D、615243

答案A

解析 &为字符串连接函数。循环体取n的个位数、十位数、百位数组成字符串8。循环执行后s字串和输入的字串倒序。选A。

转载请注明原文地址:https://kaotiyun.com/show/z0Up777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

以下关于控件数组的叙述中，错误的是
假定在窗体上添加了一个通用对话框控件，其名称为CD1，并有如下程序段：CD1.ShowOpen:CD1.DefaultExt="doc"在打开文件的对话框中选择了"c:\file1.txt"文件，则FileTitle属性的值是
(1)在考生文件夹中有工程文件sit3．vbp，其中的窗体如图2．127所示。程序刚运行时，会生成一个有10个元素的整型数组。若选中“查找最大值”(或“查找最小值”)单选按钮，再单击“查找”按钮，则找出数组中的最大值(或最小值)，并显示在标签Label2中
在考生文件夹下有一个数据库文件“samp2．accdb”，里面已经设计好了表对象“tCourse”、“tGrade”和“tStudent”，请按以下要求完成设计。(1)创建一个查询，查找并显示“姓名”、“政治面貌”和“毕业学校”等3个字段的内容，
考生文件夹下有一个数据库文件“samp3．accdb”，其中存在已经设计好的表对象“tBand”和“tLine”，同时还有以“tBand”和“tLine”为数据源的报表对象“rBand”。请在此基础上按照以下要求补充报表设计。(1)在报表的报表页
从键盘上输入一个浮点数asingle，利用字符串函数对该数进行处理后，如果输出的内容不是“非浮点数”，则对程序输出的内容分析正确的是()。asingle=InputBox("请输入一个浮点数：")str1$=Str$(asingle)：p=In
关于菜单设计，下列叙述中错误的是()。
下面程序运行后，语句“Printi”执行的次数是()。PrivateSubForm_Click()DimiAsInteger，jAsIntegeri=0Doi=i+1Forj=10To1Step-3i=i+jPri
表达式Sgn(0．25)的值是
下列运算符中，优先级别最低的是

随机试题

A．地氟烷B．异氟烷C．七氟烷D．氟烷麻醉诱导和苏醒速度最快的吸入麻醉药是
A．m3B．gC．cm3D．mlE．cm2液体检样单位报告为
甲因涉嫌入户抢劫被公安机关依法逮捕，在侦查期间，甲不讲真实姓名、住址，身份不明，后侦查机关查明了甲的身份情况，甲的父亲为其聘请了辩护律师乙，在开庭审理过程中，乙提出申请，要求本案公诉人丙回避，理由是丙偏袒本案被害人，不公正。后甲以乙法律水平不高为由，拒绝其
电阻应变片不能直接测量结构应力。()
下列词语中画线的字，每对读音都不相同的一组是()。
受先前活动影响而产生的心理活动的特殊准备状态称为()。
马克思主义哲学的中国化体现为()。
可持续发展
求
A、Lossofcostumers.B、Ruinofthereputation.C、Dangeroflawsuits.D、Compensationcosts.C总结题。可以用排除法解答。选项A指失去客户；选项B指损害名誉；选项C指诉

最新回复(0)

编写如下程序： Private Sub Command1_Click() Dim n As Long，s As String n=InputBox("输入一个数") Do While n＜ ＞0

二级VB

NCRE全国计算机二级

以下关于控件数组的叙述中，错误的是

假定在窗体上添加了一个通用对话框控件，其名称为CD1，并有如下程序段：CD1.ShowOpen:CD1.DefaultExt="doc"在打开文件的对话框中选择了"c:\file1.txt"文件，则FileTitle属性的值是

在考生文件夹下有一个数据库文件“samp2．accdb”，里面已经设计好了表对象“tCourse”、“tGrade”和“tStudent”，请按以下要求完成设计。(1)创建一个查询，查找并显示“姓名”、“政治面貌”和“毕业学校”等3个字段的内容，

考生文件夹下有一个数据库文件“samp3．accdb”，其中存在已经设计好的表对象“tBand”和“tLine”，同时还有以“tBand”和“tLine”为数据源的报表对象“rBand”。请在此基础上按照以下要求补充报表设计。(1)在报表的报表页

从键盘上输入一个浮点数asingle，利用字符串函数对该数进行处理后，如果输出的内容不是“非浮点数”，则对程序输出的内容分析正确的是()。asingle=InputBox("请输入一个浮点数：")str1$=Str$(asingle)：p=In

关于菜单设计，下列叙述中错误的是()。

下面程序运行后，语句“Printi”执行的次数是()。PrivateSubForm_Click()DimiAsInteger，jAsIntegeri=0Doi=i+1Forj=10To1Step-3i=i+jPri

表达式Sgn(0．25)的值是

下列运算符中，优先级别最低的是

A．地氟烷B．异氟烷C．七氟烷D．氟烷麻醉诱导和苏醒速度最快的吸入麻醉药是

A．m3B．gC．cm3D．mlE．cm2液体检样单位报告为

电阻应变片不能直接测量结构应力。()

下列词语中画线的字，每对读音都不相同的一组是()。

受先前活动影响而产生的心理活动的特殊准备状态称为()。

马克思主义哲学的中国化体现为()。

可持续发展

求

A、Lossofcostumers.B、Ruinofthereputation.C、Dangeroflawsuits.D、Compensationcosts.C总结题。可以用排除法解答。选项A指失去客户；选项B指损害名誉；选项C指诉

编写如下程序： Private Sub Command1_Click() Dim n As Long，s As String n=InputBox("输入一个数") Do While n＜＞0