请教以下VB代码有什么作用？与及怎么转为VB.NET代码

请问以下VB代码有什么作用？与及如何转为VB.NET代码？

VB code

Start = Timer   ' Set start time.
            Do While Timer < Start + PauseTime
                'DoEvents   ' Yield to other processes.
            Loop

------解决方案--------------------
首先设置一个开始时间为Timer，当Timer的时间小于开始时间加一个暂停时间的时间段内不停循环调用其他进程
Dim StartTime As Date = Now
Do While Now < StartTime.Add(New TimeSpan(xx))
'调用其他方法
Loop