国产探花免费观看_亚洲丰满少妇自慰呻吟_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控件。->


發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 陆良县| 特克斯县| 墨脱县| 图们市| 金山区| 纳雍县| 襄城县| 乌鲁木齐县| 浦东新区| 东山县| 延津县| 淮阳县| 鱼台县| 沂南县| 阜阳市| 绥中县| 勃利县| 丰原市| 宁明县| 广元市| 七台河市| 册亨县| 石嘴山市| 平顶山市| 乌恰县| 长沙县| 博乐市| 法库县| 株洲市| 郯城县| 砀山县| 霸州市| 双辽市| 嵊泗县| 济源市| 大理市| 开化县| 天长市| 平潭县| 望江县| 闽侯县|