填空题

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

【参考答案】

$$$$$$$$$

<上一题目录下一题>

热门试题

填空题

下列程序功能是，产生10个0～100的随机数，输出其中的最大值。请将程序补充完整。 Private Sub Form_Click() Dim an(10) As Integer Dim max As Integer Randomize For i%=1 To 10 an(i%)=______ Next max=an(1) For i%=2 to 10 if an(i%) ＞max then max=an(i%) End IF Next Print max End Sub

填空题

随机文件以 [9] 为单位读写，随机文件的记录是 [10] 记录。

相关试题