[单项选择题] 阅读如下程序： Private Sub Form_Click() Dim num As Integer，digit As Integer num=InputBox("输入数据") Do While num ＜＞ 0digit=num Mod 10num=num10Print 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
[单项选择题] 阅读如下程序： Private Sub Form_Click() Dim num As Integer，digit As Integer num=InputBox("输入数据") Do While num ＜＞ 0digit=num Mod 10num=num10Print 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
B
[分析] 本题使用了当循环，循环执行的条件是num不等于0。在循环体内，先用Mod运算符求出输入的数num的余数，接着用10对该数进行整除，将得到的商赋给num，最后输出余数。然后对整除后的num重复上述过程，直到num为0，结束循环。实际上该程序的功能是：从右至左，逐个读取num的位数，并将其赋值给digit，再在窗体上打印出来，即输出结果为：5、4、3、 2、1。
VIP截止日期：2025-01-01 00:55:08
←请使用支付宝扫码支付
VIP截止日期：2025-01-01 00:55:08
←请使用微信扫码支付
