目录 1. 模块常量声明 2. 自定义函数 3. 函数调用 示例一. 测试指定 URL 的连通性 示例二. 测试计算机网络连通性 1. 模块常量声明 声明 NetworkAlive API 函数常量。 Private Const NETWORK_ALIVE_LAN = &H1 Private Const NETWORK_ALIVE_WAN = &H2 声明 API 函数 #If VBA7 Then Private Declare PtrSafe Function IsNetwo