网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

下面程序运行后,窗体中显示______。Private Sub Command1_ Click() a$ = "*": b$ = "$ for k = 1 To 3 x$ = String$(Len(a$) +k, b$) Print x$; Next k PrintEnd Sub

A.*** ** ***

B.*$*$*$

C.1*$2*$3*$

D.$$$$$$$$$


参考答案

更多 “ 下面程序运行后,窗体中显示______。Private Sub Command1_ Click() a$ = "*": b$ = "$ for k = 1 To 3 x$ = String$(Len(a$) +k, b$) Print x$; Next k PrintEnd SubA.*** ** ***B.*$*$*$C.1*$2*$3*$D.$$$$$$$$$ ” 相关考题
考题 下面程序运行后,窗体中显示【 】。Private Sub Command1_Click) ( )aS ="*" :b$ ="$"For k = 1 To 3x$ =Strings (Len(a$) +k,b$ )Print x $;NextPrintEnd Sub

考题 在窗体上画一个名称为Labell的标签,然后编写如下事件过程: Option Base 1 Private Sub Form_Click() Dim a(20) As Integer For k=1 To 20 a(k)=k^2 Next k Label1.Caption=a(k) End Sub 程序运行后,单击窗体,在标签中显示的内容是 ______。A.400B.20C.441D.出错信息

考题 在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:Dim k As IntegerPrivate Sub form_ Load() k = 15End SubPrivate Sub Command1_ Click()Static b As IntegerDim k As Integer k= k +1 b = b+1 Print k, bEnd Sub程序运行时,两次单击命令按钮Command1后,在窗体上显示的第二行是______。A.1 1B.1 2C.2 1D.2 2

考题 在窗体中添加一个命令按钮和一个文本框,并编写如下程序代码: Private Sub Command1_Click() k=0 Do While k < 70 k=k+2 k=k*k+k a=a+k Loop Text1.Text=a End Sub 程序运行后,文本框中显示的是A.20B.32C.44D.78

考题 在窗体上画一个名称为Labell的标签,然后编写如下事件过程: Option Base 1 Private Sub Form. Click() Dim a(10)As Integer For k=1 To 10 a(k)=k^2 Next k Label1.Caption=a(k) End Sub 程序运行后,单击窗体,在标签中显示的内容是 ______。A.100B.10C.121D.出错信息

考题 阅读以下程序:Prlvate Sub Form_Click()Dim k,n,m As Integern=10m=1k=1Do While k<=nm=m*2k=k+1LoopPrint mEnd Sub程序运行后,单击窗体,输出结果为【 】。

考题 设有如下程序:OptionBase1PrivateSubForm_Click()Dima(10),P(3)AsIntegerk=5Fori=1To10a(i)=iNextiFori=1To3P(i)=a(i*i)NextiFori=1To3k=k+P(i)*2NextiPrintkEndSub程序运行后,单击窗体,则在窗体上显示的是( ) A、33B.35C.37D.38

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

考题 运行下列程序,单击窗体后显示结果为()。 Private Sub Form_Click() Dim k As Integer For k = 1 To 2 Print "3" + k; "3" k; Spc(3); Next End SubA.31 31 4 31B.31 31 32 32C.4 31 5 32D.32 32 5 32