为确诊子宫内膜结核进行诊断性刮宫术，正确的是

A．术前当天应肌注链霉素0.5g

B．官腔小而硬，无组织物刮出者，可排除诊断

C．选择时间为排卵期后

D．术中应注意刮取宫底及双侧宫角内膜

E．内膜病检未找出结核结节应排除诊断

单击按钮时，以下程序运行后的输出结果是
　Private Sub Commandl_Click( )
　　　Dim X As Integer，y As Integer，z As Integer
　　　x=1：y=2： Z=3
　　　Call God(x，x，z)
　　　Print x；x；z
　　　Call God(x，y，y)
　　　Print X；y；y
　End Sub
　Private Sub God(x As Integer，y As Integer，z As Integer)
　　　x=3 * Z + 1
　　　y=2 * Z
　　　z=x + y
　End Sub

A．6　6　12
　 7　11　11

B．8　5　10
　　5　11　11

C．9　6　12
　　9　10　15

D．8　10　10
　　5　9　10