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

admin2009-03-15  25

问题 下列程序运行时输出的结果是    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、天天向上清华大学天上人间程序设计

答案2

解析 通过LBound和UBound函数来返回一个数组中指定维的上界和下界,该程序的作用是找出并返回第一个字是天字的成语,选B。
转载请注明原文地址:https://jikaoti.com/ti/LBq0FFFM
0

最新回复(0)