下列程序的运行结果为【 】。 A='1' B='2' A=Val (@A@+Val (@B@B=Val ('12') If A<>B Then Prink A-B Else Print B-A (11)阅读下列程序: Option Base 1 Private Sub Form. Click() Dim x(3,3) For j=1 to 3 For k=1 to 3 If j=k then x(j,k)=1 If j<> k then x(j,k)=3 Next k Next j Call fun(x()) End Sub Private Sub fun(a()) For j=l to 3 For k=1 to 3 Print a (j.k); Next k Next j End Sub 运行,输出的结果是【 】