用VB写一个定时PING某IP的程序

作者：不详 文章来源：安全中国 点击数： 更新时间：2006-8-5 0:57:12

_作者:th4005@mail.intonet.net.tw

1.你先要在 Form 上放一个 Timer 控制项
2.在 Timer 属性伫设定 interval 的数值，一秒是 1000，十分之一秒就是 100，这样
会算吧。再确定 Timer.enabled=true
3.在 Timer 惟一事件伫这样写
Private Sub Timer1_Timer()
’开始你的 Ping
if ’你的 Ping 程式连通’ then
’显示绿灯图
else
’显示红灯图
end if
End Sub
4.这样 Timer 就会依你在 interval 属性伫的时间设定，固定去执行 Ping 程式。

【教程录入：残梦    责任编辑：残梦 】
【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口】

上一篇教程： 用VB制作浏览器

下一篇教程： 用VB实现聊天讨论室和点对点会话

网友评论：（评论内容只代表网友观点，与浩扬网络立场无关！）

最新推荐

热门文章

赞助商