为达到把a、b中的值交换后输出的目的，某人编程如下： Private Sub Command1_Click a％=10：b％=20 Call swap(a，B．：Print a，b End Sub Private Sub swap(ByVal aAs Integer，ByVal bAs Integer) c=a：a=b：b=c End Sub 在运行时发现输出结果错了，需要修改。下面列出的错误原因和修改方案中正确的是。 A．调用swap过程的语句错误，应改为：Call swap a，b B．输出语句错误，应改为：Print “a”，“b” C．过程的形式参数有错，应改为：swap(ByRef a As Integer，ByRef b As Integer) D．swap中3条赋值语句的顺序是错误的，应改为a=b：b=c：c=a
为达到把a、b中的值交换后输出的目的，某人编程如下： Private Sub Command1_Click a％=10：b％=20 Call swap(a，B．：Print a，b End Sub Private Sub swap(ByVal aAs Integer，ByVal bAs Integer) c=a：a=b：b=c End Sub 在运行时发现输出结果错了，需要修改。下面列出的错误原因和修改方案中正确的是。 A．调用swap过程的语句错误，应改为：Call swap a，b B．输出语句错误，应改为：Print “a”，“b” C．过程的形式参数有错，应改为：swap(ByRef a As Integer，ByRef b As Integer) D．swap中3条赋值语句的顺序是错误的，应改为a=b：b=c：c=a
相关考题：
有如下事件过程： Private Sub Commandl_Click() b=10 Do Until b=-1 a=InputBox(“请输入a的值”) a=Val(A) b=InputBox(“请输入b的值”) b=Val(B) a=a*b Loop Pdnt a End Sub 程序运行后，依次输入数值30，20，10，-1，输出结果为( )。A．6000B．-10C．200D．-6000
有如下事件过程： Private Sub Command1_Click() b=10 Do Until b=-1 a=InputBox("请输入a的值") a=Val(A) b=InputBox("请输入b的值") b=Val(B) a=a*b Loop Print a End Sub 程序运行后，依次输入数值30，20，10，-1后，输出结果为( )。A．6000B．-10C．200D．-6000
如下程序执行后的输出结果是【】。include using namespace std; class Base { public: 如下程序执行后的输出结果是【 】。include ＜iostream＞using namespace std;class Base{public:Base(int x,int y){a=x;b=y;}void Show(){cout＜＜"Base: "＜＜a＜＜ ',' ＜＜b＜＜" ";}private:int a,b;};class Derived : public Base{public:Derived(int x, int y, int z) : Base(x,y),c(z) { }void Show(){cout＜＜"Derived:"＜＜c＜＜end1;}private:int c;};int main(){Base b(100,100),*pb;Derived d(10,20,30);pb=b;pb-＞Show();pb=d;pb-＞Show();return 0;}
有如下事件过程： Private Sub Command1_Click() b=10 Do Until b =-1 a = InputBox("请输入a的值") a = Val(a)b = InputBox("请输入b值") b = Val(b)a=a*b Loop Print a End Sub 程序运行后，依次输入数值30，20，10，-1后，输出结果为( )。A．6000B．-10C．200D．-6000