A . db
B . cb
C . cc
D . fd
[单选题]执行下面的程序,单击窗体后在窗体上显示的结果是 ______。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
[单选题]以下程序运行时,单击窗体后,在窗体上输出的结果是 ______。 Private SubForm_Click() Dim a As Integer,b As Integer a=10 :b=20 Call ff(a,B)Print a,b End Sub Private Sub ff(x As Integer,y As Integer) x=x+y y=x+y End SubA.30 50B.30 30C.20 20D.10 20
[单选题]执行以下程序,在窗体上输出( )。A. 4B. 5C. 6D. 7
[单选题]下面程序运行时用鼠标左键单击窗体,输出的值是( )Privatesubform_click()l$="x£«&quo下面程序运行时用鼠标左键单击窗体,输出的值是( )Privatesubform_click()l$="x+":m$="y":n$="z"forj=1to2l$=m$:m$=n$:n$=l$nextjPrintl$+m$+n$endsubA.ZXYB.YZXC.YZYD.ZYZ
[单选题]下列程序段执行后窗体上显示()。A . 0B . 1C . 2D . 3
[单选题]以下程序执行后,在窗体上输出的图案是( )。
[单选题]执行下面的程序,单击窗体后窗体消息框内显示结果是( )。 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
[单选题]( 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
[单选题]下面的程序运行时,单击窗体后,窗体上显示的结果是( )。A.9 8 7 6 3 2B.2 3 6 7 8 9C.9 8 7 6 3D.2 3 6 7 8
[单选题]下面程序执行时,在窗体上显示的是。Private Sub Commandl_ClickD.im a(10)F.or k=1 TO 10a(k)=11-kNext kPrinta(a(3)\a(7)Mod a(5))E.nd SubA.3B.5C.7D.9