以下代码在PB9下可以正常运行，但我升级到11.5，就不行了
Long ll_hICMP
Long ll_RTN
String ls_Message
Ulong aul_IPAddr
IP_OPTION_INFORMATION lstr_IPInfo
ICMP_ECHO_REPLY lstr_ICMPReplay
//打开ICMP句柄
ll_hICMP = IcmpCreateFile()
If ll_hICMP <> 0 Then
ls_Result = ""
ls_Message = "测试测试测试测试测试测试测试测试"
aul_IPAddr = of_ChangeIPv4ToLong(as_IPaddress)
//发送ICMP请求
ll_RTN = IcmpSendEcho (ll_hICMP, aul_IPAddr, ls_Message, Len(ls_Message), 0, lstr_ICMPReplay, 282, 200) //在11.5下，每次运行到这里就自动退出了，不理解。。。。。。。
//判断回应状态
If ll_RTN > 0 Then
ls_Result = "＝√"//状态值为：" + String(lstr_ICMPReplay.Status)
Else
ls_Result = "＝×"//，错误号为：" + String(WSAGetLastError())
End If
//关闭ICMP句柄
IcmpCloseHandle(ll_hICMP)
Return ll_RTN
Else
ls_Result = "无法打开ICMP句柄！"
Return -1;
End If
[解决办法]
外部函数定义时要加 alias for ***;ansi
因为11.5是UNICODE的
