VB,输入一个正整数,以相反顺序输出,例如,输入1792,输出2971
来源:百度知道 编辑:UC知道 时间:2024/05/31 21:54:49
Private Sub Command1_Click()
a = 1792
a = Trim(Str(a))
For i = Len(a) To 1 Step -1
s = s & Mid(a, i, 1)
Next
MsgBox s
End Sub
将text里面的数据转换为string类,
定义一个指针,然后定位输出就是了。
用CStr-然后Reverse-再CInt
4628-8264