填空题 下列程序的运行结果为{{U}} 【11】 {{/U}}。 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 运行程序时,输出的结果是{{U}} 【12】 {{/U}}
  • 1、
【正确答案】 1、-9    
【答案解析】[解析] 本题考查Val函数的用法。Ⅷ函数是返回字符串内的数字,因此A=Val(A) +Val (B) =1+2=3,而B=Val("12")=12,A-B=-9,B-A=9,而A<>B,所以执行Print A-B,正确答案为-9。 (11)1 3 3 31 3 3 3l