网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
下面程序运行后，窗体中显示【 】。
Private Sub Command1_Click) ( )
aS ="*" :b$ ="$"
For k = 1 To 3
x$ =Strings (Len(a$) +k,b$ )
Print x $;
Next
End Sub
参考答案
更多 “ 下面程序运行后，窗体中显示【 】。Private Sub Command1_Click) ( )aS ="*" :b$ ="$"For k = 1 To 3x$ =Strings (Len(a$) +k,b$ )Print x $;NextPrintEnd Sub ” 相关考题
考题
下面程序运行后，窗体(Form1)中输出的结果是( )Privatesubform_load()form1.autoredraw=truex=3:y=5Printx;yendsubA.TrueTrueB.35C.窗体无显示D.x=3y=5
考题
在窗体上画一个名称为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．出错信息
考题
在窗体中添加一个命令按钮和一个文本框，并编写如下程序代码： 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．出错信息
考题
下面程序运行后，窗体中显示______。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．＄＄＄＄＄＄＄＄＄
考题
设有如下程序: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 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
热门标签
最新试卷