鼠标指针移开控件事件代码,VB.Net代码库,德仔网

代码语言

代码分类

【VB.Net】鼠标指针移开控件事件

作者:Dezai.CN / 发布于2013/6/18/ 1246


	Private Declare Function SetCapture Lib "user32" (ByVal hwnd As Long) As Long
	Private Declare Function ReleaseCapture Lib "user32" () As Long

	Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
	If 0 <= X And X <= Command1.Width And 0 <= Y And Y <= Command1.Height Then
	SetCapture Command1.hWnd
	Else
	ReleaseCapture
	'这里就是离开啦
	End If
	End Sub

　　

试试其它关键字

　指针移开控件　

同语言下

可能有用的

Dezai.CN贡献的其它代码(4037)

Copyright © 2004 - 2024 dezai.cn. All Rights Reserved 站长博客粤ICP备13059550号-3