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

admin2019-06-20 71

问题编写如下程序：
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全国计算机二级

相关试题推荐

(1)在考生文件夹下有一个工程文件sit3．vbp，相应的窗体文件为sjt3．frm。其功能是产生20个0～1000的随机整数，放入一个数组中，然后输出这20个整数中小于500的所有整数之和。程序运行后，单击命令按钮(名称为Commandl，标题为“输出小
(1)在考生文件夹中有工程文件sit3．vbp，其中的窗体如图2．127所示。程序刚运行时，会生成一个有10个元素的整型数组。若选中“查找最大值”(或“查找最小值”)单选按钮，再单击“查找”按钮，则找出数组中的最大值(或最小值)，并显示在标签Label2中
考生文件夹下存在一个数据库文件“samp2．accdb”，里面已经设计好表对象“tCourse”、“tScore”和“tStud”，试按以下要求完成设计：(1)创建一个查询，查找党员记录，并显示“姓名”、“性别”和“入校时间”三列信息，所建查询命
在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框，其名称分别为Drive1、Dir1和File1，为了使它们同步操作，必须触发驱动器的Change事件和目录的Change事件，在这两个事件中执行的语句分别为()。
在E盘当前目录文件夹下建立一个名为“Student．txt”的随机文件，要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程，请选择正确的语句完成程序(
在关系中凡能惟一标识元组的最小属性集称为该表的键或码。二维表中可能有若干个键，它们称为该表的()。
下面的语句用Array函数为数组变量a的各种元素赋值整数值：
在关系模型中，每一个二维表称为一个
下列运算符中，优先级别最高的是
下列运算符中，优先级最高的是

随机试题

处方一般不得超过（　　）用量急诊处方一般不得超过（　　）用量
患者，男性，65岁。近年来反复血尿、蛋白尿，测血压180／110mmHg，血肌酐404μmol／L，诊断为慢性肾衰竭。护理措施最重要的是每天
地役权人的权利有()。
建设工程项目实施的组织策划的内容不包括()。
下列各项，()不属于管理费用的内容。
下列会计科目中，不属于资产类的是()。
人生的价值在于对社会的贡献，这是因为(　　)
在窗体上画一个文本框，名称为Text1，画一个命令按钮，名称为Command1。程序运行时，单击命令按钮，能将事先输入到文本框中的内容一个字符一个字符地写入顺序文件test.dat中。请在空格处填上适当的内容，将程序补充完整。PrivateSubCo
A、Thewomaninvitesthemantohavedinner.B、Themanwon’tvisitthewoman.C、Themanisverybusythesedays.D、Theman’swife
TheCentralNationA)ImmigrationplacesAmericaatthecentreofawebofglobalnetworks.Sowhynotmakeiteasier?Immigratio

最新回复(0)

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

二级VB

NCRE全国计算机二级

在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框，其名称分别为Drive1、Dir1和File1，为了使它们同步操作，必须触发驱动器的Change事件和目录的Change事件，在这两个事件中执行的语句分别为()。

在E盘当前目录文件夹下建立一个名为“Student．txt”的随机文件，要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程，请选择正确的语句完成程序(

在关系中凡能惟一标识元组的最小属性集称为该表的键或码。二维表中可能有若干个键，它们称为该表的()。

下面的语句用Array函数为数组变量a的各种元素赋值整数值：

在关系模型中，每一个二维表称为一个

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

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

处方一般不得超过（ ）用量急诊处方一般不得超过（ ）用量

患者，男性，65岁。近年来反复血尿、蛋白尿，测血压180／110mmHg，血肌酐404μmol／L，诊断为慢性肾衰竭。护理措施最重要的是每天

地役权人的权利有()。

建设工程项目实施的组织策划的内容不包括()。

下列各项，()不属于管理费用的内容。

下列会计科目中，不属于资产类的是()。

人生的价值在于对社会的贡献，这是因为( )

A、Thewomaninvitesthemantohavedinner.B、Themanwon’tvisitthewoman.C、Themanisverybusythesedays.D、Theman’swife

TheCentralNationA)ImmigrationplacesAmericaatthecentreofawebofglobalnetworks.Sowhynotmakeiteasier?Immigratio

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

处方一般不得超过（　　）用量急诊处方一般不得超过（　　）用量

人生的价值在于对社会的贡献，这是因为(　　)