下面程序是用来打印九九乘法表的，请补充完整。
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

禁止携带、邮寄的动植物、动植物产品和其他检疫物名录由国务院农业行政主管部门制定并公布。旅客携带有特许审批的禁止进境物，须经核实特许审批单以及输出国检疫证书，送交实验室进行检验后放行。( )