填空题

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim i As Integer,n As Integer n=0 For i=1 To 50 i=i+3 n=n+1 If i＞10 Then Exit For Next i Text1.Text=Str(n) End Sub

点击查看答案&解析