1. (2021·浙江模拟) 有如下VB程序：

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

执行该程序后，在窗体界面中显示的结果是（    ）

A . B . C . D .