填空题

下面程序是用来打印九九乘法表的，请补充完整。
Dim i As Integer，j As Integer，Strl$
Str1=" "
For i=1 To 9
For j=1 To 9
If [9] Then
Str1=Str1+Str$(j)+"×"+Str$(i)+"="+Str$(Val(i*j))
Else
Str1=Str1 & Chr(13)
[10]
End If
Next j
Next i
Pnnt Str1