vb 逆序输出（For语句）

Question

随机抽取一个10000以内的正整数，并逆序输出（要求用For语句）

Answer 1

逆序..晕死,我以为找10000个数呢.
这个就简单了啊,你直接当字符串就行了嘛.
mid下就去串了嘛.Private Sub Command1_Click()
Dim s As String
Dim ss As String
Randomize
a = Int(Rnd * 10000 + 1)
l = Len(a)
For i = l To 1 Step -1
ss = ss & Mid(a, i, 1)
Next
Me.Text1.Text = ss
Print a
End Sub