[填空题] 下面的程序执行时,可以从键盘输入一个正整数,然后把该数的每位数字按逆序输出。例如,输入7685,则输出5 8 6 7;输入1000,则输出0 0 0 1。请填空。 Private Sub
15 查阅
[填空题] 下面的程序执行时,可以从键盘输入一个正整数,然后把该数的每位数字按逆序输出。例如,输入7685,则输出5 8 6 7;输入1000,则输出0 0 0 1。请填空。
Private Sub Command1_Click()
Dim x As Integer
x=InputBox("请输入一个正整数")
While x> (10)
Print x Mod 10:
x=x10
Wend
Print (11)
End Sub
参考答案: