填空题

在窗体上画一个名称为Command1的命令按钮，编写如下事件过程 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