vb反向输出?
vb反向输出?
日期:2020-06-11 17:24:45 人气:1
已经完成的代码如下:
Sub ReverseDigit()
Dim number As Integer, digit As Integer
number = Val(InputBox("请输入一个非负整数"))
If (number < 0) Then
Debug.Print number; "不是非负整数,请输入非负整数"
Exit Sub
End If
Debug.Print number; &q