填空题

下面程序运行后，窗体中显示______。 Private Sub Command1_Click) () a$="*":b$="$" For k=1 To 3 x$=String$(Len(a$) +k，b$) Print x$； Next Print End Sub

【参考答案】

$$$$$$$$$

<上一题目录下一题>

热门试题

填空题

设有命令按钮Command1的单击事件过程，代码如下，请填空。Private Sub Command1_Click() Dim a(30) As IntegerFor i=1 To 30a(i) =iNextFor Each arrItem______aIf arrItem Mod 7=0 Then Print arrItem；If arrItem＞90 Then Exit ForNextEnd Sub

填空题

在窗体上画一个文本框，名称为Text1，画一个命令按钮，名称为Command1。程序运行时，单击命令按钮，能将事先输入到文本框中的内容一个字符一个字符地写入顺序文件test.dat中。请在空格处填上适当的内容，将程序补充完整。Private Sub Command1_Click() Open C: test.dat For______As #1For i=1 to Len(Text1.text) print #1，mid(Text1.Text,i,1) NextClose #1End Sub

相关试题