求教vb代码

来源：百度知道 编辑：UC知道 时间：2024/06/05 10:59:18
编写一个程序。让人做做十道十位数减个位数的减法题。最后显示结果

Private Sub Command1_Click()
Randomize
a = Int(99 * Rnd + 1)
b = Int(9 * Rnd + 1)
Text1.Text = a
Text2.Text = b
x = a - 10 * b
Text3.Text = x
MsgBox "下一题", 48, "确认"
End Sub

能不能把问题说的更详细些，十位数减个位数指的是什么？