下列程序运行时输出的结果是 Private Sub Form_Click() Dim x x=Array("天天向上","清华大学","天上人间","程序设计") For i=LBound(a,1)to UBound(a,1) If Left(a(i),1)="天"Then Print a(i); Next End SubA.天天向上B.天天向上天上人间C.出错信息D.天天向上清华大学天上人间程序设计

题目

下列程序运行时输出的结果是 Private Sub Form_Click() Dim x x=Array("天天向上","清华大学","天上人间","程序设计") For i=LBound(a,1)to UBound(a,1) If Left(a(i),1)="天"Then Print a(i); Next End Sub

A.天天向上

B.天天向上天上人间

C.出错信息

D.天天向上清华大学天上人间程序设计


相似考题
更多“下列程序运行时输出的结果是Private Sub Form_Click()Dim x x=Array("天天向上","清华大学","天 ”相关问题
  • 第1题:

    有以下程序:includeusing namespace std;classA{private: int x;public: A(int a) {x

    有以下程序: #include<iostream> using namespace std; class A { private: int x; public: A(int a) { x=a; } friend class B; }; class B { public: void print(A a) { a.x--; cout<<a, x<<end1; } }; int main () { A a(10); B b; b.print (a) ; return 0; } 程序执行后的输出结果是( )。

    A.9

    B.10

    C.11

    D.12


    正确答案:A
    解析:本题考核友元类的应用。在程序中,类B是类A的友元类,因此,在类B的所有成员函数中均可访问类A的任何成员。在main()中,先定义类A的一个对象a(10)和类B的一个对象b。然后通过对象b调用其成员函数print(),输出对象a的私有成员x的值减1即9。

  • 第2题:

    下列程序运行时输出的结果是( )。 Private Sub Form_Click() Dima a=Array("天天向上","清华大学","天上人间","程序设计") forI=Lbound(a,1) to Ubound(a,1) ifleft(a(i),1)="天"then print a(i); nextI End Sub

    A.天天向上

    B.天天向上天上人间

    C.出错信息

    D.天天向上清华大学天上人间程序设计


    正确答案:B

  • 第3题:

    有如下程序:

    #include<iostream>

    Usingnamespacestd;

    classBase{

    public:

    Base(intx=O):valB(x){cout<<valB;)

    ~Base( ){cout<<valB;)

    Private:

    intvalB:

    };

    classDerived:publicBase{

    public:

    Derived(intX=0,inty=0):Base(x),valD(y)(cout<<valD;)

    ~Derived( ){cout<<valD;)

    private:

    intvalD;

    };

    intmain( ){

    Derivedobj12(2,3);

    return0;

    }

    运行时的输出结果是( )。

    A.2332

    B.2323

    C.3232

    D.3223


    正确答案:A
    A。【解析】本题使用析构函数。

  • 第4题:

    下列程序运行时输出的结果是 Private Sub Form_Click() Dim x x=Array(“天天向上”,“清华大学”,“天上人间”,“程序设计”) For i=LBound(a,1)to UBound(a,1) If Left(a(i),1)=“天”Then Print a(i); Next End Sub

    A.天天向上

    B.天天向上天上人间

    C.出错信息

    D.天天向上清华大学天上人间程序设计


    正确答案:B
    解析:通过LBound和UBound函数来返回一个数组中指定维的上界和下界,该程序的作用是找出并返回第一个字是天字的成语,选B。

  • 第5题:

    下列程序运行时输出的结果是

    Private Sub Form_Click()

    Dim x

    x=Array("天天向上","清华大学","天上人间","程序设计")

    For i=LBound(a,1) to UBound(a,1)

    If Left(a(i),1)="天"Then Print a(i);

    Next

    End Sub

    A.天天向上

    B.天天向上天上人间

    C.出错信息

    D.天天向上清华大学天上人间程序设计


    正确答案:B
    解析:考查数组Lbound和Ubound函数的概念和使用方法。通过LBound和UBound函数来返回一个数组中指定维的上界和下界,该程序的作用是找出并返回第一个字是天字的成语,故选B)。