VB6.0 控件自由拖動

VB6.0 控件自由拖動 有時,在編寫代碼的時候,可能需要一個浮動的界面(根據用戶需求,實時拖動),下面將介紹如何實現 1.首先要修改控件的DragMode模式爲0.如下圖所示: '注意,以下代碼可以直接複製到VB代碼最前面,然後,替換Frm_SM爲對應的控件名即可 '2.整體添加全局變量,即程序寫在最前面 Dim xPos As Long Dim yPos As Long '3.爲對象的Mous
相關文章
相關標籤/搜索