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