2. 计算机
  3. 阅读如下程序： Private Sub Form_Click() Dim num As Integer，digit As Integer num=InputBox("输入数据") Do While num ＜＞ 0

阅读如下程序： Private Sub Form_Click() Dim num As Integer，digit As Integer num=InputBox("输入数据") Do While num ＜＞ 0

admin2009-02-13  30
问题 阅读如下程序：    Private Sub Form_Click()      Dim num As Integer，digit As Integer      num=InputBox("输入数据")      Do While num  ＜＞  0        digit=num Mod 10        num=num\10        Print digit；      Loop    End Sub    程序运行后，如果从键盘上输入12345，则输出的结果为
选项 A、1  3  7  5  9
B、5  4  3  2  1
C、2  4  6  8  10
D、1  2  3  4  5
答案2
解析 本题使用了当循环，循环执行的条件是num不等于0。在循环体内，先用Mod运算符求出输入的数num的余数，接着用10对该数进行整除，将得到的商赋给num，最后输出余数。然后对整除后的num重复上述过程，直到num为0，结束循环。实际上该程序的功能是：从右至左，逐个读取num的位数，并将其赋值给digit，再在窗体上打印出来，即输出结果为：5、4、3、 2、1。
转载请注明原文地址:https://jikaoti.com/ti/Yrq0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)