下列有权进行查询和冻结但无权扣划的执法机关为（）。

A.人民检察院

B.公安机关

C.国家安全机关

D.审计机关

单击命令按钮时，下列程序的执行结果为（ ）。　　Private Sub Command1_Click()　　　Dim x As Integer，y As Integer　　　x=12：y=32　　　Call Proc(x，y)　　　Print x；y　　End Sub　　Public Sub Proc(n As Integer，ByVal m As Integer)　　　n=n Mod 10　　　m=m Mod 10　　End Sub

A． 1 5 9

B． 7 5 3

C． 3 5 7

D． 5 9 1