有下列程序段，单击命令按钮执行程序后，输出结果为( )。 Option Base 1 Private Sub Command1_Cliek() Dim x x=Array(23, -5, 17, 38, -31, 46, 11, 8, 5, -4) s1=0 s2=0 Fork=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 SubA．148B．40C．-40D．3.7
题目
有下列程序段，单击命令按钮执行程序后，输出结果为( )。 Option Base 1 Private Sub Command1_Cliek() Dim x x=Array(23, -5, 17, 38, -31, 46, 11, 8, 5, -4) s1=0 s2=0 Fork=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
相似考题
更多“有下列程序段,单击命令按钮执行程序后,输出结果为()。Option Base 1 Private Sub Command1_Cliek( ”相关问题
-
第1题：
有如下的程序：
单击命令按钮后，输出结果为：（ ）
A．2 2
B．4 4
C．5 5
D．6 6
正确答案：D
在Sub过程中，程序段先定义了3个Integer型变量k，m，P，并给k赋初值4，m的初值为1，然后调用事件过程Pid，并将它的值赋给P；在事件过程Pid中定义了两个形参，参数的传送是通过引用实参，即将k，m的地址作为a，b的地址；在Pid中，将m，I定义为静态变量，所以第一次调用后的值仍然保留，但是m，1分别都有赋值语句，将它们的值变为5，2，所以返回值不变都是66。 -
第2题：
单击命令按钮，下列程序段的输出结果为______。 Private Sub Command1_Click() Dim n As Integer n = 5 While n ＜= 10 n = n + 2 Print n; Wend End Sub
A．5 7 9 11
B．6 8 10
C．7 9 11
D．6 8 10 12
正确答案：C
-
第3题：
在窗体上有一个命令按钮，然后编如下事件过程：
程序运行后，单击命令按钮，在输入对话框内输入-1，输出结果是 。
正确答案：
-1的平方根是一个虚数
【解析】在Sub过程中，定义了一个Double型变量N，并调用InputBox函数，给N赋值，即将从对话框中输入的-1赋给N；通过运算符”&”，将N与字符串”的平方根”连接起来并赋给Msg；在条件块语句中将N作为参数，调用SR事件过程，将Function过程的返回值作为测试表达式；在SR函数中，调用Sgn函数测试x的值为正数还是负数，如果是正数，那么就执行条件块语句中的SR=Sqr(x)，即将X的平方根作为返回值，如果x值为零，Sgn函数返回值为零，那么就将0作为返回值；如果为负数。Sgn函数返回值为-1，SR=-1，即将-1作为返回值；在Sub程序的条件块语句中，根据SR返回值的不同，执行不同操作，当返回值为0，将Msg字符串加”是0”，赋给Ms9，如果是-1，将Msg加”是一个虚数”赋给Msg，当为其他时，即在平方根时，将字符串Msg加”是”，再加上这个数的平方根赋给Msg，并用MsgBox函数输出。 -
第4题：
有以下程序includeusing namespace std:class Base{private:char c;public:Base(cha 有以下程序#include ＜iostream＞using namespace std:class Base{private: char c;public: Base(char n) :c(n) {} ～Base ( ) { cout＜＜c; }}; class Derived : public Base{private: char c;public: Derived(char n):Base (n+1),c(n) {} ～Derived() { cout＜＜c; }};int main(){ Derived obj('x'); return 0;} 执行后的输出结果是
A．xy
B．yx
C．x
D．y
正确答案：A
解析：本题考核继承与派生中继承基类的数据成员与成员函数。在C++中，由于析构函数不能被继承，因此在执行派生类的析构函数时，基类的析构函数也将被调用。执行顺序是先执行派生类的析构函数，再执行基类的析构函数，其顺序与执行构造函数的顺序正好相反．在此题的程序中，在主函数main结束时，派生类Derived对象obj将被删除，所以就会调用对象的析构函数。先调用派生类的析构函数，输出x，然后调用基类的析构函数，输出y。 -
第5题：
有以下程序includeusing namespace std;class Base{private:char c;public:Base(char 有以下程序 #include＜iostream＞ using namespace std； class Base { private： char c； public： Base(char n)：c(n){} ～Base() { cout＜＜c； } }； class Derived：public Base { private： char c； public： Derived(char n)：Base(n+1)，c(n){} ～Derived() { cout＜＜c； } }； int main() { Derived obj('x')； return 0； } 执行后的输出结果是
A．xy
B．yx
C．x
D．y
正确答案：A
解析：本题考核继承与派生中继承基类的数据成员与成员函数。在C++中，由于析构函数不能被继承，因此在执行派生类的析构函数时，基类的析构函数也将被调用。执行顺序是先执行派生类的析构函数，再执行基类的析构函数，其顺序与执行构造函数的顺序正好相反。在此题的程序中，在主函数main结束时，派生类Derived对象obj将被删除，所以就会调用对象的析构函数。先调用派生类的析构函数，输出x，然后调用基类的析构函数，输出y。 -
第6题：
在窗体上画一个名为Command1的命令按钮，编写如下程序：
程序运行后，单击命令按钮，输出的结果是_________。
正确答案：
4
【解析】本题考查了数组的嵌套使用。程序首先通过一个For循环给数组M的各个数组元素赋值，然后通过数组下标嵌套本身。注意：这样的嵌套时，要保证数组下标不出界，否则程序将出错。