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

admin2019-06-20 68

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

相关试题推荐

设窗体上有一个名称为List1的列表框和一个名称为Check1的复选框数组(下标从0开始)。程序运行时，单击某个复选框，如果列表框中没有该复选框的标题，则把该复选框的标题添加到列表框中，否则从列表框中把该复选框标题删除。PrivateSubCheck
设窗体上有3个图像框：Image1、Image2、Image3，并有下面的程序代码：PrivateSubForm_Load()Image1.Picture=LoadPicture("LEAF.bmp")Image2.Picture=LoadPi
考生文件夹下有工程文件sjt5．vbp。程序运行时，外观如图2．187所示，单击“显示数据”按钮，则将考生文件夹下in5．dat文件的内容读入到5行40列的：维数组a中，并按5行显示在Text1文本框内；单击“统计”按钮，则计算每行中小于50的数之和，及这
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个文本框，其名称为T1，宽度和高度分别为1400、400；再画两个命令按钮，其名称分别为c1和C2，标题分别为“显示”和“扩大”，编
在考生目录下有一个工程文件sjt5．vbp，其窗体上有一个文本框，名称为Text1；还有两个命令按钮，名称分别为C1、C2，标题分别为“计算”、“存盘”，如图2．20所示。并有一个函数过程isprime(a)可以在程序中直接调用，其功能是判断参数a是否为素
(1)在考生目录下有一个工程文件sjt3．vbp，包含了所有控件和部分程序。程序运行时，在文奉框中每输入一个字符，则立即判断：若是小写字母，则把它的大写形式显示在标签Label1中；若是大写字母，则把它的小写形式显示在Labe11中；若是其他7符，则把该字
考生文件夹下有一个数据库文件“samp2．accdb”，其中存在已经设计好的3个关联表对象“tStud”、“tCourse”和“tScore”及表对象“tTemp”。请按以下要求完成设计。(1)创建一个查询，查找并显示学生的“姓名”、“课程名”和
下列数据结构中，能用二分法进行查找的是()。
在深度为7的满二叉树中，叶子结点的个数为
下列运算符中，优先级别最低的是

随机试题

简述企业选定记账本位币应当考虑的因素。
患者，女，50岁。突然出现视物成双一周。眼部检查：右眼视力1．0，左眼视力1．0，外眼前节未见异常。眼位；映光；+25。右眼外转刚过中线。该患者最可能出现的代偿头位是
夏枯草可治
依据施工合同示范文本通用条款，在施工合同履行中，如果发包人不按时支付预付款，承包人可以(　　)。
如果某地区制造工人的市场工资率从2000元／月上升到2500元／月，其劳动力供给总时间上升5％，则此类劳动力的劳动力供给弹性为()。
下列发生的价款以外的其他费用，应列作计算营业税的价外税款的项目的是()。
安第斯山脉是美洲板块和太平洋板块碰撞形成的。()
袋子里有4种不同颜色的小球，每次摸出2个，要保证10次所摸的结果是一样的，至少要摸()次。
一、注意事项1．本试卷由给定资料与作答要求两部分构成。考试时限150分钟。满分100分。2．作答参考时限：阅读资料40分钟作答110分钟。3．仔细阅读给定资料，按作答要求依次作答。答案要写在指定位置。不在指定位置作答的，不得分。4．
在面向对象的程序设计中，类描述的是具有相似性质的一组【】。

最新回复(0)

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

二级VB

NCRE全国计算机二级

设窗体上有3个图像框：Image1、Image2、Image3，并有下面的程序代码：PrivateSubForm_Load()Image1.Picture=LoadPicture("LEAF.bmp")Image2.Picture=LoadPi

请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个文本框，其名称为T1，宽度和高度分别为1400、400；再画两个命令按钮，其名称分别为c1和C2，标题分别为“显示”和“扩大”，编

考生文件夹下有一个数据库文件“samp2．accdb”，其中存在已经设计好的3个关联表对象“tStud”、“tCourse”和“tScore”及表对象“tTemp”。请按以下要求完成设计。(1)创建一个查询，查找并显示学生的“姓名”、“课程名”和

下列数据结构中，能用二分法进行查找的是()。

在深度为7的满二叉树中，叶子结点的个数为

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

简述企业选定记账本位币应当考虑的因素。

患者，女，50岁。突然出现视物成双一周。眼部检查：右眼视力1．0，左眼视力1．0，外眼前节未见异常。眼位；映光；+25。右眼外转刚过中线。该患者最可能出现的代偿头位是

夏枯草可治

依据施工合同示范文本通用条款，在施工合同履行中，如果发包人不按时支付预付款，承包人可以( )。

如果某地区制造工人的市场工资率从2000元／月上升到2500元／月，其劳动力供给总时间上升5％，则此类劳动力的劳动力供给弹性为()。

下列发生的价款以外的其他费用，应列作计算营业税的价外税款的项目的是()。

安第斯山脉是美洲板块和太平洋板块碰撞形成的。()

袋子里有4种不同颜色的小球，每次摸出2个，要保证10次所摸的结果是一样的，至少要摸()次。

在面向对象的程序设计中，类描述的是具有相似性质的一组【】。

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

依据施工合同示范文本通用条款，在施工合同履行中，如果发包人不按时支付预付款，承包人可以(　　)。