有个关于vb 的问题 希望大家能帮帮忙……

Question

Private Sub Command1_Click()
Text1 = Int(Rnd * 900 + 100)
a = Val(Text1)
End Sub
Private Sub Command2_Click()
Text2 = Val((a \ 100) + ((a Mod 100) Mod 10) * 100 + ((a Mod 100) \ 10) * 10)
End Sub
Private Sub Command3_Click()
Text1 = ""
Text2 = ""
End Sub

这是为什么产生不了逆序，，每次逆序都是0 …… 为什么

Answer 1

private sub command2_click()
text2=strreverse(text1.text)
end sub

Answer 2

Dim a As Long
Private Sub Command1_Click()
Text1 = Int(Rnd * 900 + 100)
a = Val(Text1)
End Sub
Private Sub Command2_Click()
Text2 = Val((a \ 100) + ((a Mod 100) Mod 10) * 100 + ((a Mod 100) \ 10) * 10)
End Sub
Private Sub Command3_Click()
Text1 = ""
Text2 = ""
End Sub

Answer 3

变量未声明。
在程序前面加一句“Dim a！”

Answer 4

忘记了，查看下书后的名词解释啊