假定有如下程序代码，程序运行后，把鼠标光标移到窗体内，每单击一次，变换一种鼠标光标的形状，依次显示鼠标光标的15个属性。请在划线处将程序补充完整。
Private Sub Form_Click()
Static x As Integer
Cls
Print "Mousepointer Property is now"; x
Form1. 【12】 =x
x=x+1
If x=15 Then x=0
End Sub

移架，在顶板较好的情况下，移架工作在采煤机后滚筒之后1.5m处进行，一般不超过1—2m。