单项选择题

在窗体上画—个命令按钮和—个标签，其名称分别为Command1和Label1，然后编写如下事件过程： Private Sub Command1_tlick() 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

<上一题目录下一题>

热门试题

单项选择题

假定有以下函数过程： 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．gfedeba

单项选择题

在窗体上画—个名称为Command1的命令按钮，再画两个名称分别为Label1、Label2的标签，然后编写如下程序代码： Private X As Integer Private Sub Command1_Click() X=5:Y=3 Call proc(X,Y) Label1.Caption=X Label2.Caption=Y End Sub Private Sub proc(a As Integer,ByVal b As Integer) X=a*a Y=b+b End Sub 程序运行后，单击命令按钮，则两个标签中显示的内容分别是______。

A．25和3
B．5和3
C．25和6
D．5和6

相关试题