单项选择题

在窗体上画一个命令按钮和一个标签，其名称分别为Command1和Label1，然后编写如下事件过程：
Private Sub Command1_Click()
Counter=0
For i=1 To 4
For j=6 To 1 Step -2
Counter=Counter+1
Next j
Next i
Label1.Caption=Str(Counter)
End Sub
程序运行后，单击命令按钮，标签中显示的内容是

A．11
B．12
C．16
D．20

<上一题目录下一题>

热门试题

单项选择题

设窗体上有一个文本框Text1和一个命令按钮Command1，并有以下事件过程： Private Sub Command1_Click() Dim s As String, ch As String s= For k=1 To Len(Text1) ch=Mid(Text1,k,1) s=ch+s Next k Text1.Text=s End Sub 程序执行时，在文本框中输入Basic，然后单击命令按钮，则Text1中显示的是

A．Basic
B．cisaB
C．BASIC
D．CISAB

单项选择题

假定有以下函数过程： Function Fun(S As String) As String Dim s1 As String For i=1 To Len(s) s1=LCase(Mid(S,i,1))+s1 Next i Fun=s1 End Function 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim Str1 As String, Str2 As String Str1=InputBox( 请输入一个字符串 ) Str2=Fun(Str1) Print Str2 End Sub 程序运行后，单击命令按钮，如果在输入对话框中输入字符串abcdefg，则单击“确定”按钮后在窗体上的输出结果为

A．ABCDEFG
B．abcdefg
C．GFEDCBA
D．gfedcba

相关试题