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

admin2019-06-20 85

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

相关试题推荐

在考生文件夹下有一个工程文件vbsj5．vbp，已给出了部分控件和部分程序。请在窗体上画三个标签，其名称分别为lblName、11blTel和lblPost，标题分别为“姓名”、“电话号码”和“邮政编码”。再画三个文本框，其名称分别为txtName、txt
在考生文件夹下有一个工程文件sit5．vbp，窗体上有两个标题分别是“读数据”和“统计”的命令按钮。请画两个标签，名称分别为Labell和Label2，标题分别为“出现次数最多的字母是”和“它出现的次数为”；再画两个名称分别为Text1和Text2、初始值
在考生文件夹中有一个工程文件sjt5．vbp，如图2．129所示。运行程序时，从文件中读入矩阵数据并放入二维数组a中。甲击“计算”按钮时，将统计矩阵两个对角线的元素中能被3整除的个数，统计结果显示在标签lblFirst中；同时计算矩阵主对角线的元素之和，计
Fibonacci数列的规律是：前2个数为1，从第3个数开始，每个数是它前2个数之和，即：1，1，2，3，5，8，13，21，34，55，89，…。某人编写了下面的函数，判断大于1的整数x是否是Fibonacci数列中的某个数，若是，则返回True，否则返
假设用复制、粘贴的方法建立了一个命令按钮数组Command1，以下对该数组的说法错误的是()。
以下关于控件数组的叙述中，错误的是
在设计阶段，如果双击窗体上的一个文本框控件，则在代码窗口中显示该控件的事件过程所对应的事件是
支持子程序调用的数据结构是()。
下列运算符中，优先级别最高的是

随机试题

Pleaseturnoffyoursmartphonebeforetheplanetakesoff.
患者，男性，55岁。因患胃癌行胃大部切除，手术后1周出现咳嗽、咳痰，痰液黄、脓性，体温40℃，稽留热。胸部X线片示右中肺野大片浸润阴影，并见空洞和液平面。患者痰培养多次检到金黄色葡萄球菌，曾应用青霉素、苯唑西林、头孢呋辛酯、头孢噻肟、头孢他啶、阿米卡星
关于多囊卵巢综合征，下述哪项是错误的：
甲公司共有200名职工，其中50名为总部管理人员，150名为直接生产工人。从2×21年1月1日起，该公司实行累积带薪缺勤制度。该制度规定，每名职工每年可享受5个工作日带薪年休假，未使用的年休假只能向后结转一个日历年度，超过1年未行使的权利作废；职工休年休假
如图所示，有两本完全相同的书A、B，书重均为5N，若将两本书等分若干分后，交叉地叠放在一起置于光滑的水平桌面上，将书A固定不动，用水平向右的力F把书B匀速地抽出，现测得一组数据如下：若将书分成32份，力F应为()。
变异
传输速率为54Mbps的WLAN标准是()。
After_______testingit,wecouldofficiallyreceivegovernmentalapprovalfortherecentlydevelopedpart.
A、dothedrawingsfirst,andthenhavetheactorsrecordthesoundB、photographtheactorsfirst,andthendothedrawingsC、rec
A、Anoticeonthebulletinboard.B、Abookforaclassthemanistaking.C、Achemistryclassthatisbeingtaught.D、Thelibrar

最新回复(0)

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

二级VB

NCRE全国计算机二级

Fibonacci数列的规律是：前2个数为1，从第3个数开始，每个数是它前2个数之和，即：1，1，2，3，5，8，13，21，34，55，89，…。某人编写了下面的函数，判断大于1的整数x是否是Fibonacci数列中的某个数，若是，则返回True，否则返

假设用复制、粘贴的方法建立了一个命令按钮数组Command1，以下对该数组的说法错误的是()。

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

在设计阶段，如果双击窗体上的一个文本框控件，则在代码窗口中显示该控件的事件过程所对应的事件是

支持子程序调用的数据结构是()。

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

Pleaseturnoffyoursmartphonebeforetheplanetakesoff.

关于多囊卵巢综合征，下述哪项是错误的：

如图所示，有两本完全相同的书A、B，书重均为5N，若将两本书等分若干分后，交叉地叠放在一起置于光滑的水平桌面上，将书A固定不动，用水平向右的力F把书B匀速地抽出，现测得一组数据如下：若将书分成32份，力F应为()。

变异

传输速率为54Mbps的WLAN标准是()。

After_______testingit,wecouldofficiallyreceivegovernmentalapprovalfortherecentlydevelopedpart.

A、dothedrawingsfirst,andthenhavetheactorsrecordthesoundB、photographtheactorsfirst,andthendothedrawingsC、rec

A、Anoticeonthebulletinboard.B、Abookforaclassthemanistaking.C、Achemistryclassthatisbeingtaught.D、Thelibrar

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