注意：要设置form的controlbox属性为false，
特别注意： form.text要设置为空,否则不会把标题栏去掉
（本文来源于图老师网站，更多请访问http://m.tulaoshi.com）Dim MousX As Integer
Dim MousY As Integer
（本文来源于图老师网站，更多请访问http://m.tulaoshi.com）Dim CurrX As Integer
Dim CurrY As Integer
Public Sub myMouseDown(ByVal sender As Object, ByVal ex
