题目

有如下Visual Basic程序： Private Sub Command1_Click()Dim i As Integer, c As Integer, n As Integern = Val(Text1.Text)c = 0For i = 1 To nIf i Mod 3 = 0 Then c = c + 1Next iLabel1.Caption = Str(c)End Sub运行该程序，在文本框Text1中输入20，单击命令按钮Command1，在标签Label1中显示的是。 答案：【1】6

查看本题答案和解析