在窗体上有一个由3个按钮组成的控件数组,它们的Caption属性分别为"按钮1","按钮2"以及"按钮3",Index值分别为0,1,2。该控件数组的事件代码如下:
Private Sub Command1_Click(Index As Integer)
Print Index
End Sub
当我们点击”按钮2“时,窗体上显示的内容为【1】;当我们点击”按钮1“时,窗体上显示的内容为【2】
Private Sub Command1_Click(Index As Integer)
Print Index
End Sub
当我们点击”按钮2“时,窗体上显示的内容为【1】;当我们点击”按钮1“时,窗体上显示的内容为【2】
举一反三
- 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a=1:b=2:c=3 a=b:b=c:c=a Print a;b;c End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是().
- 窗体上有一名为Text1的文本框,三个单选按钮构成控件数组,名称为Option1,程序运行后,单击某个单选按钮,则文本框中的字体随着随选择的单选按钮切换,请完善下面程序. Private Sub Option1_Click(Index As Integer) Select Case 【1】 Case 0 a = "宋体" Case 1 a = "黑体" Case 2 a = "楷体_GB2312" End Select Text1.【2】 = a End Sub
- 在窗体上画一个名称为Command 1命令按钮,然后编写如下事件过程: Private Sub Command1_Click() c="ABCD" For n=1 To 4 Print ▁▁▁▁ Next End Sub 程序运行后,单击命令按钮,要求在窗体上显示如下内容: D CD BCD ABCD 则在横线处填入的内容为?
- 工程中有2个窗体,名称分别为Form1、Form2,Form1为启动窗体,该窗体上有命令按钮Command1。要求程序运行后单击该命令按钮时显示Form2,则按钮的Click事件过程应该是______。 A: Private Sub Command1_Click() Form2.Visible End Sub B: Private Sub Command1_Click() Form2.Show End Sub C: Private Sub Command1_Click() Form2.Load End Sub D: Private Sub Command1_Click() Load Form2 End Sub
- 在窗体上添加一个命令按钮Command1,然后编写如下事件过程: Private Sub Command1_Click() For i = 1 To 4 x = 4 For j = 1 To 3 x = 3 For k = 1 To 2 x = x + 6 Next k Next j Next i Print x End Sub 程序运行后,单击命令按钮,显示结果为( )。