下面程序： Private Sub Form _Click () Dim x, y, z As Integer x=5 y=7 z=0 Call P1(x, y, z) Print Str (z) End Sub Sub P1 (ByVal a As Integer, ByVal b As Integer , c As Integer) c= a+b End Sub 运行后的输出结果为______。

A．0

B．12

C．Str(

D．显示错误信息

设置“开课日期”字段的输入掩码为“短日期”，默认值为本年度的9月1日(规定：本年度年号必须由函数获取)。