Question

这道题怎么用vb写，老师布置的作业,我不会做

随机产生一个2位数，求其个位数和十位数字的和，将个位数和十位数互换，得到新的2位数。
要求：把结果输出

Answer 1

a=int(90* rnd)+ 10 '生成随机两位数a
b=a mod 10 +int(a/10) '计算个位数和十位数字的和b
c=( a mod 10) *10 +int(a/10) '个位数和十位数互换后得新数c

Answer 2

我可以写。

追问

帮我写啊,我就哪个 随机产生两位数 不会写，其他就会。

追答

Private Sub Command1_Click()
    Randomize
    Dim a As Integer
    a = Int(Rnd * 90 + 10)
    Print "这个两位数是" & a
    Print "这个两位数十位数和个位数的和是" & a \ 10 + (a Mod 10)
    Print "个位数和十位数交换后是" & 10 * (a Mod 10) + a \ 10
End Sub