Private Sub WebBrowser7b_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser7b.DocumentCompleted
龙城网站建设公司创新互联建站,龙城网站设计制作，有大型网站制作公司丰富经验。已为龙城上千多家提供企业网站建设服务。企业网站搭建\成都外贸网站制作要多少钱，请找那个售后服务好的龙城做网站的公司定做！
Timer1.Interval = 6000
Timer1.Enabled = True
Me.WebBrowser7b.Navigate("") ’这里你一下载完成枯中州就刷新，当然没蔽就不停循培灶环了。应该把此语句转移到Timer1_Tick 事件里面
End Sub
比如你有
Dim a As New WindowsMediaPlayer
设置路径：州孙源a.URL = "D:\music\xxx.mp3"凯橘;
播放：册态a.controls.play()
暂停：a.controls.pause()
详细查看了你的问题，完全不需要使用线程sleep的方法。
在这边，我要给你备慎引入一个概念。就是Form窗体的两个方法。
Form.Show()和Form.ShowDialog()
第一个Show方法运行后，你的主程序还是会进行，你的代码还是会继续进行下知物去。此时，窗体还是弹出的。
第二个ShowDialog方法运行后，此时，弹出的一个窗体，你不将其关闭，那么仿猛敬，主程序就会一直等待这个窗体关闭后，才执行后面的代码。
所以，你只需要使用showdialog这个方法，即可达到你想要的结果。
那么，如何才能让弹出的窗体不改变呢？很简单
你可以找到窗体的formcloseing事件，在这个事件中，有一个参数：e
这个e有一个属性，就是e.handle，表示是否处理过这个事件了。
这个时候，如果你不想让窗体关闭，你可以写：
e.handle=true，那么表示已经处理过窗体关闭的事件了。
注：有些情况，可能是：e.cancel=true
在你给textbox设置text值后直接使用sleep()，因为在使用sleep（）的时候，当前的主进程是被挂起了，也就是说设置的text属性后，还来不及在屏幕上显示lbi的内容就执行了sleep，所以在执行sleep()挂起主进程前，你必须让textbox的内容先显示出来再执行sleep，可尝试使用下DoEvents（）将控制权暂时移交一下，让系统有时机来刷新textbox里面的内容，让系统有机会来刷新textbox里面的内容。由于我没有安装visual studio的开发环境，无法调试代码的正确性，但我记得我以前也遇到此类问题，采取的DoEvents()的方式。你芹神可尝试下。
lbl.Visible = True
Sleep(5000)
lbl.Text = "我是中国人"
lbi.Refresh '刷新一下lbi，具体你可以调试下，看需要不需要这条
Application.DoEvents() ‘设置完lbi的text属性，将操作权限释放一下，让系统有机会显示lbi的内容。
Sleep(3000) ’待显示后，再执行挂起
lbl.Text = "我爱自己的祖国"
lbi.Refresh ‘同上
Application.DoEvents() ’同上
DoEvents（）的功能解释是：转让控制权，以便让操作系陵敏统处理其它的事件。
如执行一次不行，可尝试重复嫌汪亏多执行几次，特别在循环语句中，对于窗口的刷新显示DoEvents特别有用，但是在循环体内使用了DoEvents后，当前进程的执行效率会有大幅降低，因为移交控制权必然损失当前进程的运行效率。
