| VB声明 |
| Declare Function EnumPorts Lib "winspool.drv" Alias
"EnumPortsA" (ByVal pName As String, ByVal Level As Long, ByVal lpbPorts As
Long, ByVal cbBuf As Long, pcbNeeded As Long, pcReturned As Long) As Long |
| 说明 |
| 枚举一个系统可用的端口 |
| 返回值 |
| Long，非零表示成功，零表示失败。会设置GetLastError |
| 参数表 |
| 参数 |
类型及说明 |
| pName |
String，指定服务器的名字。用vbNullString指定本地系统 |
| Level |
Long，1或2（1用于NT 3.51），分别指定PORT_INFO_1 或 PORT_INFO_2 |
| lpbPorts |
Long，包含PORT_INFO_1 或 PORT_INFO_2结构的缓冲区 |
| cbBuf |
Long，lpbPorts缓冲区中的字符数量 |
| pcbNeeded |
Long，指向一个Long型变量的指针，该变量用于保存请求的缓冲区长度，或者实际读入的字节数量 |
| pcReturned |
Long，载入缓冲区的结构数量（用于那些能返回多个结构的函数） |
| 注解 |
参考AddPort函数，了解进一步的情况 |