题目内容
（请给出正确答案）
[判断题]
在一个数中，相邻两位的位权值之比等于10（）
如搜索结果不匹配，请 联系老师 获取答案
Private Sub Form_Click()
Dim a() As Byte, b() As Byte
Dim i As Byte, m As Byte, n As Byte
n = InputBox("请输入n值：")
----1---- a(n), b(n)
For i = 1 To n
a(i) = 10 + Int(Rnd * 90)
If a(i) Mod 5 = 0 Then
m = m + 1
----2----
Print b(m);
If ----3----
End If
Next i
Print "个位数为0的数有"; m; "个"
End Sub
