单选题 运行下列程序：
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
单击窗体后，则在窗体上显示的结果是________。