百变泽鲁斯有用吗:我想找位高手指点一下迷津

来源:百度文库 编辑:查人人中国名人网 时间:2024/04/28 06:34:52
下面有一段程序,是在书上看到的所谓监控进程的代码:
option explicit
Private Declare Function WaitForSingleObject Lib "kernel32" (ByVal hHandle As Long, ByVal dwMilliseconds As Long) As Long

Private Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As Long

Private Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long
private const INFINITE = -1&
private const SYNCHRONIZE = &H100000

Private Sub Command1_Click()
Dim i As Long
Dim r As Long
Dim p As Long
i = Shell("notepad.exe", vbNormalFocus)
p = OpenProcess(SYNCHRONIZE, False, i)
r = WaitForSingleObject(p, INFINITE)
r = CloseHandle(p)
MsgBox "记事本已经关闭"
End Sub

就是上面的代码,大部分都能看懂,不过有些地方不懂,如:在定义常量的时候,那个private const INFINITE=-1&,-1&的是代表什么,是什么意思,这个还有其他值吗?还有,private const SYNCHRONIZE=&H100000这个又是什么意思,那&H100000又代表什么,还可以是其它值吗,值的意思又是什么呢?希望那个高手指点,本人比较笨,多多指教,谢谢!!!!再希望各位留下QQ号或其它联系方式方便以后请教。

作者有没有结果,我也想知道。你问的问题答案。

我想-1是否是逻辑值呢?
&H100000

已经扯到了操作系统底层的东西了。