近亲结婚，大大提高后代出现__________的发病率。

单击命令按钮，下列程序的执行结果为()。　　Private Sub Commandl_Click()　　　　Dim x As Integer，y As Integer　　　　x=32：y=42　　　　Call PCS(x，y)　　　　Print x；y　　End Sub　　Public Sub PCS(Byval n As Integer，ByVal m As Integer)　　　　n=n Mod 10+1　　　　m=m Mood 10+1　　End Sub

A．If x<3 * y And x>y Then y=x^3

B．If x<3 * y And x>y Then y=3x

C．If x<3 * y：x>y Then y=x^3

D．If x<3 * y And x>y Then y=x * * 3