题目

根据以下程序,在文本框Text1中输入3，最后List1中输出的是（  ） Private Sub Command 1_Click() Dim i As Integer Dim t As Integer Dim s As String i = 1:t = 1:n = Text1.Text List1.Clear Do While t< = n   s = s + “*”   If i = t Then   List1.AddItem s   t = t + 1   i=0  End If i = i + 1 Loop End Sub A . B . C . D . 答案：D

查看本题答案和解析