利用.NET現有的控制項就能做的到，看來.net開發起來真的是便利性十足

——————————————-
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Dim sc As New ServiceProcess.ServiceController()
sc.ServiceName = "服務的名稱"
If sc.Status = ServiceProcess.ServiceControllerStatus.Running Then
sc.Stop()
sc.WaitForStatus(ServiceProcess.ServiceControllerStatus.Stopped)
End If
If sc.Status = ServiceProcess.ServiceControllerStatus.Stopped Then
Try
sc.Start()
sc.WaitForStatus(ServiceProcess.ServiceControllerStatus.Running)
Catch
End Try

End If
sc.Dispose()
end sub

——————————————————

但一直沒時間回覆他

剛好今天有點小空就回答了他

順便分享給同樣有此問題的朋友們

其實很容易的,只要抓特徵碼便可。

Private Sub WebBrowser1_Navigating(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserNavigatingEventArgs) Handles WebBrowser1.Navigating
Dim test = e.Url.OriginalString.ToString
If test.Contains(『iclk』) Then
Button1.Enabled = True
End If
End Sub