填空题

在窗体上画一个名称为Commmld1的命令按钮，编写如下事件过程
Private Sub Command1 Click()
Dim a As String
a=______
For i = 1 To 5
Print Space(6-i)；Mid$(a， 6-i， 2*i-1)
Next i
End Sub
程序运行后，单击命令按钮，要求窗体上显示的输出结果为
5
456
34567
2345678
123456789
请填空。

【参考答案】

"123456789\
<上一题 目录 下一题>
热门 试题

填空题
在窗体上画一个命令按钮和一个文本框，然后编写命令按钮的Click事件过程。程序运行后，在文本框中输入一串英文字母(不区分大小写)，单击命令按钮，程序可找出未在文本框中输入的其他所有英文字母，并以大写方式降序显示到Text1中。例如，若在 Text1中输入的是abDfdb，则单击Command1按钮后Text1中显示的字符串是ZYXWVUTSRQPONMLKJIHGEC。请填空。 Private Sub Command1_Click() Dim str As String，s As String，c As String str=UCase(Textl) s = c = Z While c＞= A If InStr(str，c)=0 Then s = ______ End If c = Chrs(Asc(c) ______) Wend If s＜＞ Then Text1 = s End If End Sub
填空题
以下语句的输出结果是______。 Print Int(12345.6789*100+0.5) 100
相关试题