设窗体上有一个名称为Lable1的标签。程序运行时，单击鼠标左键，再移动鼠标，鼠标的位置坐标会实时地显示在Lable1标签中：单击鼠标右键则停止实时显示，并将标签中内容清除。下面的程序可实现这一功能，请填空。
Dim Down As Boolean
Private Sub Form _MouseDown(Button As Integer，Shift As Integer，x As Single，Y As Single)
Select Case （ 8 ）
Case 1
Down=True
Case 2
Down=False
End Select
End Sub
Private Sub Form _MouseMove(Button As Integer，Shift As Integer，X As Single，Y As Single)
If （ 9 ）
（ 10 ） =”X=”& X &” Y=”& Y
Else
Label1.Caption=””
End if
Sub