写出一个VB表达式，用于实现三位正整数N的倒置（若N=123倒置后为321）

写出一个VB表达式，用于实现三位正整数N的倒置（若N=123倒置后为321）

a=123
b=(a mod 10)*100+(a\10 mod 10)*10+a\100

im a As String Private Sub Command1_Click() a = StrReverse(a) ' Text1(0).Text = a End Sub Private Sub Form_Load() a = "123"反向字符串 Text1(1)

private sub command1_click() dim a as string*3 ipt:a=inputbox("请输入要倒置的三位整数") msgbox str(val(mid(a,3,1))) & str(val(mid(a,2,1))) & str(val(mid(a,2,1))) '为什么不直接输出那是因为防止用户输入了非整数 exit sub eee: msgbox "输入错误！" goto ipt end sub

int((u - l + 1) * rnd + l)这是取得l到u之间随机整数的公式,

u是上限,l是下限.

rnd生成0到1之间的随机小数

int是取整