VB的运算能力是微秒级的也就是百万次的简单运算可以在1秒钟内完成当然这也取决于计算机的性能
5000次颜色比对,对VB来说1秒钟完成是没有问题的但如果你是取全部颜色比对,运算量最大是255X255X255,对VB来说是相当吃力的
Private Declare Function GetTickCount Lib "kernel32" () As Long
'用这个GetTickCount 可以实现你想要的
'在你程序开始时候获取一次
'在你程序结束时候再获取一次
'两个一减就是你要的时间
下面是我写的测试的方便你看的一段代码
点击按钮一下开始计时
点第二下计时结束 获取两次点击的时间差,并打印出来 应该对你有帮助
Dim i As Integer
Dim begtime As Long
Dim endtime As Long
Private Sub Command1_Click()
If i <> 1 Then
begtime = GetTickCount
Print "开始时间" & begtime
i = 1
Else
endtime = GetTickCount
Print "结束时间" & endtime
Print "-------" & (endtime - begtime) & "毫秒"
i = 0
End If
End Sub
加入一个label,加入一个timer,timer的interval属性设置1000,然后加代码:
Private Sub Timer1_Timer()
Label1Caption = Now
End Sub
以上就是关于VB每处理一条代码的时间是多少全部的内容,包括:VB每处理一条代码的时间是多少、各位大侠请问;用VB编写记录程序某一段程序的运行时间,可以暂停和继续时间,也可以读出结束时间、vb 中如何让程序运行时就显示时间 并且能动态显示系统时间等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)