单项选择题

运行下列程序:
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