填空题 运行下面的程序，当单击窗体时，窗体上显示的内容的第一行是 1，第三行是 2，第五行是 3。
Private Sub Form_Click()
Dim s As String, i As Integer, n(9)As Integer
Dim s1 As String*1, j As Integer
s=Trim("12345a307291b233")
For i=1 To Len(s)
s1=Mid(s, i, 1)
If s1＞="0" And s1＜="9" Then
j=Val(s1)
n(j)=n(j)+1
End If
Next i
For j=0 To 9
Print j; ":"; n(j)
Next j
End Sub