重庆分公司,新征程启航

为企业提供网站建设、域名注册、服务器等服务

vb.net延迟 vb 延时

VB.net 如何ping一个ip地址并获取延迟值?

Dim b As Boolean = My.Computer.Network.Ping("192.168.1.1", 1000) '返回ping结果,true表示通,false表示不通,1000表示1000毫秒内返回结果 

目前创新互联已为上千家的企业提供了网站建设、域名、虚拟空间、网站托管运营、企业网站设计、牧野网站维护等服务,公司将坚持客户导向、应用为本的策略,正道将秉承"和谐、参与、激情"的文化,与客户和合作伙伴齐心协力一起成长,共同发展。

If b = True Then '指定时间内ping通

Shell("cmd /c ping 192.168.1.1  C:\time.txt") '在C盘time.txt文件中保存ping的结果

Else '超时

MsgBox("999") '弹出999提示

End If

VB.NET的几种延时方法

Imports System.Threading

Thread.Sleep(1000)’延迟1秒

2.PauseWait(1000)’延迟1秒

Public Sub PauseWait(ByVal HowLong As Long)

Dim tick As Long

tick = My.Computer.Clock.TickCount

Do

My.Application.DoEvents()

Loop Until tick + HowLong My.Computer.Clock.TickCount

End Sub

如何正确理解VB.NET延时函数

第一个for完成对delay_time参数的控制,即共循环多少次内部循环

第二个for(内部循环),完成对j从0到199的控制,共循环200次。

翻译成汇编就是:

(R0为传递参数)

DELAY:

MOV R1,#200

DJNZ R1,$

DJNZ R0,DELAY

RET


新闻名称:vb.net延迟 vb 延时
路径分享:http://cqcxhl.com/article/hjdhpj.html

其他资讯

在线咨询
服务热线
服务热线:028-86922220
TOP