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