下列程序段执行后窗体上显示（）。

[单选题]编写如下事件过程：程序运行后窗体上显示（ ）。A． 6 4 2B． 2 4 6C． 2D． 6

[单选题]执行下面的程序，单击窗体后窗体消息框内显示结果是( )。 PRIVATE SUB FORM_CLICK() DIM STR AS STRING, K AS INTEGER STR="AB" FOR K = LEN(STR) TO 1 STEP -1 STR=STR&CHR(ASC(MID(STR, K, 1)) +K) NEXT K MSGBOX STR END SUBA．ABCEB．ABCDC．ABDBD．ABFB

[单选题]下列程序段运行后窗体上输出结果为( )。 Private Sub Command1 Click() a=5：b=4：c=3：d=2 X=3＞2*b Or a=c And b＜＞C Or c＞d Print X End SubA．1B．TrueC．FalseD．2

[单选题]下列程序段运行后窗体上输出结果为( )。 Private Sub Command1_Click() a=5: b=4: c=3: d=2 x=3＞2*b Or a=c And b＜＞c Or c＞d Print x End SubA．1B．TrueC．FalseD．2

[单选题]下列程序段，运行后窗体上输出结果是( )。Private Sub Command1_Click()a=5:b=4:c=3:d=2x=3＞2*b Or a=c And b＜＞c Or c＞dPrintxE．nd SubA．1B．TrueC．FalseD．2

[单选题]下列程序段，运行后窗体上输出结果是 Private Sub Commnad1_Click() a=5∶b=4∶c=3∶d=2 x=3＞2*b Or a=c And b＜＞c Or c＞d Print X End SubA. 1 B. True C. False D. 2

[单选题]执行以下程序段，在窗体上显示的结果是___A__。PrivateSubForm_Click（）DimSAsString，iAsIntegerS="ab"Fori=Len（S）To1Step-1PrintChr（Asc（Mid（S，i，1））+i）NextIEndSubA . dbB . cbC . ccD . fd

[单选题]有如下程序，单击command1后窗体显示结果是( )OptionBase1PrivateSubCommand1_Click()D．imaa=Array(1,2,3,4,5)F．ori=LBound( )ToUBound( )a(i)=i*a(i)NextiPrinti;UBound( )E．ndSubA．65B．625C．不确定D．程序出错

[单选题]执行下面的程序，单击窗体后在窗体上显示的结果是 ______。Private Sub form_ Click() Dim Str1 As String, Str2 As String Dim Str3 As String, I As Integer Str1 = "e" for I = t To 2 Str2 = Ucase (Str1) Str1 = Str2 & Str1 Str3 = Str3 & Str1 str1 = Chr (Asc(Str1) + I) Next

[单选题]（ 27 ）下面程序执行时，在窗体上显示的是Private Sub Command1_Click()D．im a(10)F．or k = 1 To 10a(k) = 11 – kNext kPrint a(a(3)/a(7) Mod a(5))E．nd SubA． ） 3B． ） 5C． ） 7D． ）9