单击命令按钮，下列程序的执行结果为()。　　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

下列哪种方法不可以检测患者的血压变化：（）

A.无创血压测量

B.心电监护仪

C.Swan-Ganz漂浮导管

D.Picco检测仪

E.ABP导管