有如下程序：　　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

33岁，女性，G₂P₂，3年前末次分娩行产钳助产术，近半年来 * * 口有肿物脱出。查体宫颈及部分宫体脱出 * * 口外，伴 * * 壁明显脱垂，子宫大小正常，双附件（-）。治疗方式应选择（）

A.曼市手术

B.经腹子宫切除及 * * 前后壁修补术

C.经阴子宫切除及 * * 前后壁修补术

D. * * 封闭术

E.子宫托