某公司2003年度销售收入为5000万元，销售成本为4000万元，净利润为200万元;年初资产总额为2000万元，年末资产总额为3000万元;年初应收帐款为400万元，年末应收帐款为600万元;年初存货为200万元，年末存货为300万元。

该公司2003年的应收帐款周转率为()次

A.5

B.10

C.12

D.16

程序执行结果s的值是 【7】 。
Private Sub sub1(Byval p As Integer)
p=p*2
End Sub
Private Sub Command1_Click()
Dim i As Integer
i=3
Call sub1(i)
if i＞4 then i=i mod 2
Print cstr(i)
End Sub