设有如下程序: Option Base 0 Private Sub Form_Click() Dim a Dim i As Integer a = Array(1,2,3,4,5,6,7,8,9) For i = 0 To 3 Print a(5 – i); Next End Sub 程序运行后,单击窗体,则在窗体上显示的是()
相似题目
-
对窗体编写如下代码: Option Base1 Private Sub Form_Key Press(Key Ascii AsInteger) a=Array(237,126,87,48,498) m1=a(1) m2=1 IfKey Ascii=13Then ForI=2To5 Ifa(I)>mlThen m1=a(j) m2=I EndIf NextI EndIf Printm1 Printm2 EndSub 程序运行后,按回车键,输出结果为()
-
Which of the following is the encryption algorithm used for priv option when using SNMPv3?()
-
有如下语句: Option Base 1 Private Sub Command1_Click() Dim A(2, -1 To 1) As Integer …… End Sub 以上语句所定义的数组 A为( )维数组,共有( )个元素,第一维下标从( )到( ),第二维下标从( )到( )。
-
设有如下程序,则程序的输出结果是( )int k=1,s=0;while(s<10){s=s+k*k;k++;}printf(%d,k);
-
设有如下程序,则程序的输出结果是( ) int k=1,s=0; while(s<10) {s=s+k*k;k++;} printf(\%d\,k);
-
设有如下声明语句: Option Base 1 Dim arr(3,-1 To 4) As Integer 则数组arr中数组元素的个数是( )
-
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码;Option Base 1Private Sub Com
-
设有数组声明语句,定义的数组a为_______维数组,数组元素个数为_______。 Option base 1 Dim a()
-
设有如下程序:PrivateSubForm_Click() DimjAsInteger,sumAsInteger j=1 sum=0 Whilejif j mod 3=0 then sum=sum+jj=j+1 wendprint sumEndSub 程序运行后,单击窗体,输出结果
-
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Option Base 1Private Sub Comma
-
有如下程序:include<iostream>using namespace std;class BASE{public:~BASE(){cout<<"BASE";}
-
在窗体上面一个命令按钮(其Name属性为Command1),然后编写如下代码:Option Base 1Private Sub Cor
-
有如下程序 include <iostream> using namespace std; class Base { protected: Base(){cout<<'A'; } Base(char c) { cout<<c; } }; class Derived: public Base { public: Derived(char c){ cout<<c; } }; int main(){ Derived d1 ('B'); return 0; } 执行这个程序屏幕上将显示输出
-
有如下程序: include<iostroam> using namespace std; class Base{ protected: Base{cout<<’A’;} Base(char C){cout<<c;} }; class Derived:public Base{ public: Derived(char C){tout<<C;} }; int main{ Derived dl(’B’); retum 0; } 执行这个程序的输出结果是()。
-
有如下程序:include <iostream>using namespace std;class BASE{public:~BASE(){cout<<"BASE";}
-
设有如下程序:程序运行后,单击命令按钮,如果在输入对话框中依次输入1、2、3、4、5、6、7、8、9、0,则输出结果是()。
-
在“声明”段有语句Option Base 1,那么用如下语句声明的数组a包含的元素个数为()。 Dim a(-1 To 3, 3, 4)
-
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序代码: Option Base 1 Dim arr() As Integer Private Sub Command1_Click() Dim i As Integer, j As Integer Dim s As Integer ReDim arr(4, 2) s = 0 For i = 1 To 3 For j = 1 To 2 arr(i, j) = i + j Next j Next i ReDim Preserve arr(4, 4) For j = 3 To 4 arr(3, j) = j + 10 Next j For i = 1 To 4 s = s + arr(i, i) Next i Print s End Sub 程序运行过程中,当单击Command1时,输出结果为________。
-
在窗体上画一个名为Command1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Command1_ Click()Dim arrarr = Array(358, 32, 46, 73, 23, 59, 26, 91, 583, 12)For i = ______ For j = ______ If arr(i) >= arr(j) Then a = arr(j
-
在窗体上画一个名称为Command1的命令按钮。编写如下程序: Option Base1 Private Sub Command1_Click() Dim a(10) As Integer For i=1 To 10 a(i)=i Next Call swap((11) ) For i=1 To 10 Print a(i); Next End Sub Sub swap(b()As Integer
-
有如下程序:Option Base 1Private Sub Form Click()Dim arr,SumSum=0 arr=Array(1,3,5,7,9,11,13,15,17,19)For i=1 To 10If arr(i)/3=arr(i)//3 ThenSum=Sum+arr(i) En
-
在窗体上画一个名为Command1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Command1_ Click() Dim arr arr = Array(358, 32, 46, 73, 23, 59, 26, 91, 583, 12) For i = ______ For j = ______ If arr(i) >= arr(j) Thena = arr
-
以下程序的功能是,产生10个0~1000的随机整数,放入数组Art中,然后输出其中的最大值。请填空。 Option Base 1 Private Sub Form Click() Dim Arr(10)As Integer Dim Max As Integer Randomize For i=1 To 10 Arr(i)=Int(Rnd*1000) Next i Max= (14) For i=
-
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Command1_Click() Dim a(10)As Integer For i=1 To 10a(i)=i Next Call swap(【13】 ) For i=1 To 10Print a(i); Next End Sub Sub swap(b()As Integer