© 1999-2048 dssz.net 粤ICP备11031372号
[VB] 隐藏与显示鼠标程序(vb6.0源代码编写)Private Declare Function ShowCursor Lib "user32" (ByVal bShow As Long) As Long
说明: 隐藏与显示鼠标程序(vb6.0源代码编写)Private Declare Function ShowCursor Lib "user32" (ByVal bShow As Long) As Long Private Sub Command1_Click() '隐藏鼠标 ShowCursor True '计数加一 Command1.Enabled = False Command2.Enabled = True End Sub Private Sub Command2_Click() '显示鼠标<misoline> 上传 | 大小:5kb