求教 一段简单的代码
Public Class Form1Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Timer1.Interval = 1000
Timer1.Start()
End Sub
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
Dim i As New Uri("http://m.)
WebBrowser1.Url = i
Refresh()
End Sub
End Class
运行会有“系统刷新”的声音 而且鼠标会显示“忙”
如何改?
望高手指点
[ 本帖最后由 leesan 于 2012-3-17 11:10 编辑 ]