国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 學院 > 開發設計 > 正文

獲得MouseLeave的方法

2019-11-18 17:53:08
字體:
來源:轉載
供稿:網友
VB中缺少一個MouseLeave事件,給編程帶來許多不便。例如,當我們想令鼠標移動到一個命令按鈕時令其Caption屬性為一個名稱,離開時又是另一個名稱,我們通常只能這么處理:用兩個MouseMove事件:一個是命令按鈕的,另一個可能是窗體的,也可能是命令按鈕周邊的其它控件的。——這無疑很麻煩,而且當控件較為緊湊時往往達不到預期的目的。有沒有什么辦法可以判斷鼠標已經從某一個控件中移走呢?請看下面的例子。

在標準EXE工程中缺省創建一個TextBox,然后鍵入以下代碼:

OptionExplicit

'申明API函數——
ReleaseCapture
EndIf

EndSub

運行程序,把鼠標移到Text1,Text1顯示:Inside,移開則顯示:Outside,可見已經達到目的了。
此法適合于一切具有hWnd屬性的控件(如下所列):

ProgressBar控件,Slider控件,StatusBar控件,TabStrip控件,ToolbarControl,Animation控件,UpDown控件,DBCombo控件,DBList控件,SSTab控件,PicturtClip控件,RichTextBox控件,PropertyPage對象,UserControl對象,UserDocument對象,CheckBox控件,ComboBox控件,CommandButton控件,DirListBox控件,DriveListBox控件,FileListBox控件,Form對象,Forms集合,Frame控件,HscrollBar,VScrollBar控件,ListBox控件,MDIForm對象,OptionButton控件,PictureBox控件,TextBox控件,OLEContainer控件。->


發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 哈密市| 祁连县| 万山特区| 阿克苏市| 黄浦区| 龙井市| 新化县| 徐汇区| 阳谷县| 涟源市| 顺昌县| 吉安市| 宿松县| 连山| 临漳县| 桓仁| 河东区| 永昌县| 南通市| 淳化县| 开化县| 镇康县| 呼玛县| 华宁县| 芮城县| 葫芦岛市| 海晏县| 疏勒县| 交城县| 涡阳县| 五莲县| 兰考县| 高唐县| 方山县| 永仁县| 营口市| 建德市| 潢川县| 博客| 房产| 余江县|