须办理检疫审批的货物必须从检疫许可证中列明的口岸入境。

运行下列程序：
Private Sub Form Click()
Sum=0
For i=1 To 100
If Mid(CStr(i)，1， 1)="1" Then
Sum=Sum+1
End If
Next i
Print Sum
End Sub
单击窗体后，在窗体上显示的结果是

A．12

B．13

C．14

D．15