下面程序： Private Sub Form_Click() Dim x,y,z As Integer x=5 y=7 z=0 CallPI(x,y,z) Print Str(z) End Sub SubP1(By Val a As Integer, By Val b As Integer, c As Integer) C=a+b End Sub 运行后的输出结果为______。

A．0

B．12

C．Str(

D．显示错误信息

同一军运号码的运输，中途因车辆故障等原因需分批挂运时，票据应如何处理？