以下程序实现每次单击按钮Command1时，标签在窗体Form1上向右移动100特维，当标签移动出窗体右边界时，再次单击按钮标签将回到窗体的左边界，请填空。Private Sub Command1_Click() If Label1.Left > Form1.Width Then Label1.Left=0 Else __________________________ End IfEnd Sub
举一反三
- 工程中有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，则单击Command1时，输出结果为。 Public Function Fn(n) If n = 0 Then Fn = 1 Else Fn = Fn(n - 1) * n End Function Private Sub Command1_Click() Print Fn(6) End Sub
- 已知两个窗体Form1、Form2，下列事件过程中，______ 可以实现单击窗体Form1的命令按钮时，显示窗体Form2，而窗体Form1消失。 A: Private Sub Command1_ Click() LoadForm2 Form1. Hide End Sub B: Private Sub Command1_ Click() Show Form2 Form1. Hide EndSub C: Private Sub Command1_ click() Show Form2 Form1. Hide End Sub D: Private Sub Command1_ click()
- 在窗体上画一个名称为Command 1命令按钮，然后编写如下事件过程： Private Sub Command1_Click() c="ABCD" For n=1 To 4 Print ▁▁▁▁ Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容： D CD BCD ABCD 则在横线处填入的内容为？
- 在名为“Form1”的窗体上添加三个文本框和一个命令按钮，其名称分别为“txt1”、“txt2”、“txt3”和“Command1”，然后编写如下两个事件过程： Private Sub Command1_Click() txt3=txt1+txt2 End Sub Private Sub Form l_Load() txt1=" " txt2=" " txt3=" " End Sub 当打开窗体Form 1后，在txt1和txt2中分别输入3和5，然后单击命令按钮Command1，则文本框txt3中显示的内容为______。