题目内容：
下面的程序执行时，可以从键盘输入一个正整数，然后把该数的每位数字按逆序输出。例如：输入7685，则输出5 8 6 7；输入1000，则输出0 0 0 1。请填空。
Private Sub Command 1_Click()
Dim x As Integer
x=InputBox(“请输入一个正整数”)
While x> 【1】
Print x Mod 10：
x=x\10
Wend
Print 【2】
End Sub
参考答案：
答案解析：
填空题：下面的程序执行时，可以从键盘输入一个正整数，然后把该数的每位数字按逆序输出。例如：输入7685，则输出5 8 6 7；输
- 题目分类：VB
- 题目类型：填空题
- 查看权限：VIP
例如：输入7685，则输出5 8 6 7；输入1000，则输出0 0 0 1。请填空。
Private Sub Command 1_Click()
Dim x As Integer
x=InputBox(“请输入一个正整数”)
While x> 【1】
Print x Mod 10：
x=x\10
Wend
Print 【2】
End Sub