![[单项选择题] 有下列程序段，单击命令按钮执行程序后，输出结果是( )。 Option Base 1 Private Sub Command1 Click() Dim x x=Array(23,-5](http://www.mshxw.com/aiimages/31/481150.png "[单项选择题] 有下列程序段，单击命令按钮执行程序后，输出结果是( )。 Option Base 1 Private Sub Command1 Click() Dim x x=Array(23,-5")
[单项选择题] 有下列程序段，单击命令按钮执行程序后，输出结果是( )。 Option base 1 Private Sub Command1 Click() Dim x x=Array(23,-5,17,38,-31,46,11,8,5,-4) 31=0 s2=0 For k=1 To 10 If(x(k)>0)Then S1=S1+x(k) Else s2=s2+x(k) End If Next k Y=s1/Abs(s2) Print Y End Sub
A．148
B．40
C．40
D．3.7
正确答案：D
参考解析：For循环中，通过两个条件语句，计算数组中大于零的元素的和s1，小于零的元素的和s2，然后计算sL和s2的绝对值之商，正确结果为3.7。 [知识拓展] Abs函数的作用是返回参数的绝刘值，其返回值的类型和参数相同。
