有如下程序：　　Private Sub Commandl_Click()　　　　Dim a As Single　　　　Dim b As Single　　　　a=2：b=4　　　　Call CS(a，b)　　End Sub　　Sub CS(x As Single，y As Single)　　　　t=X　　　　x=t\y　　　　y=t Mod y　　End Sub　　程序运行后，单击命令按钮，a和b的值分别为()。

A．0 0

B．1 1

C．0 2

D．1 2

下列措施中可以增加袜带密度的（）

A.选择高织针数的针筒

B.选择低织针数的针筒

C.将压针三角向上移动

D.将压针三角向下移动