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

admin2019-06-20 52

问题编写如下程序：
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://jikaoti.com/ti/eoN0FFFM

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