在窗体中添加一个名称为Command1的命令按钮，然后编写如下事件代码: Private Sub Command1_Click() Dim x As Integer，y As Integer x=12:y=32 CaU p(x，y) MsgBox x * y End Sub Public Sub p(n As Integer，ByVal m As Integer) n=n Mod 10 m=m Mod 10 End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果为______。

某大型水利水电工程施工合同签订后，根据承包人的申请，发包人向其提供了有关本工程的其他水文和地质勘探资料，但未列入合同文件，承包人使用上述资料引发的后果应由( )负责。

A．发包人
B．承包人
C．监理人
D．上述资料的编写者