Private Sub Command1_Click()
Dim s as string, k as string, i as integer
s = "*":k = "0"
For i = 1 To 5
k = k + "0":s = k + s
List1.AddItem s
Next i
End Sub
执行该程序后,在窗体界面中显示的结果是( )