[填空题] 在窗体上画一个名称为Command1的命令按钮。编写如下事件过程： Private Sub Command1_Click() Dim a As

[填空题] 在窗体上画一个名称为Command1的命令按钮。编写如下事件过程：

Private Sub Command1_Click()

Dim a As String

A= 【6】

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解析：[分析]： 空格函数Space $(n)的功能是返回n个空格，函数Mid $(字符串,p,n)的功能是从位置p开始取字符串的n个字符。