vb.net中如何結束一個線程

vb.net中如何結束一個線程

成都網站建設哪家好，找成都創新互聯！專注于網頁設計、成都網站建設、微信開發、小程序開發、集團成都定制網頁設計等服務項目。核心團隊均擁有互聯網行業多年經驗，服務眾多知名企業客戶；涵蓋的客戶類型包括：主動防護網等眾多領域，積累了大量豐富的經驗，同時也獲得了客戶的一致認可！

一般而言,如果您想終止一個線程,您可以使用System.Threading.Thread類的Abort方法. 例如:

Dim worker As ThreadStart = New ThreadStart(AddressOf workerthreadmethod)

Dim t As Thread = New Thread(worker)

t.Start()

MessageBox.Show("Wait for a while for the thread to start.")

MessageBox.Show(t.ThreadState.ToString())

t.Abort()

MessageBox.Show(t.ThreadState.ToString())

t.Join()

MessageBox.Show(t.ThreadState.ToString())

當然,在調用Abort方法后,線程并不是立刻終止,要等線程的所有finally快中的代碼完成后才會完全終止. 所以在主線程中可以用Join方法來同步,當線程還未完全終止時,t.Join()將處于等待,直到t線程完全結束后再繼續執行后面的語句。

Abort方法是會導致線程跳出一個異常錯誤的，你需要在代碼中捕獲該異常。下面是一個比較完整的VB.NET線程例子：

Imports System

Imports System.Threading

Public Class MyTestApp

Public Shared Sub Main()

Dim t As New Thread(New ThreadStart(AddressOf MyThreadMethod))

'Start the thread

t.Start()

MsgBox("Are you ready to kill the thread?")

'Kill the child thread and this will cause the thread raise an exception

t.Abort()

' Wait for the thread to exit

t.Join()

MsgBox("The secondary thread has terminated.")

End Sub

Shared Sub MyThreadMethod()

Dim i As Integer

Try

Do While True

Thread.CurrentThread.Sleep(1000)

Console.WriteLine("This is the secondary thread running.")

Loop

Catch e As ThreadAbortException

MsgBox("This thread is going to be terminated by the Abort method in the Main function")

End Try

End Sub

End Class

Thread.Abort()方法用來永久銷毀一個線程，而且將拋出ThreadAbortException異常。使終結的線程可以捕獲到異常但是很難控制恢復，僅有的辦法是調用Thread.ResetAbort()來取消剛才的調用，而且只有當這個異常是由于被調用線程引起的異常。因此，A線程可以正確的使用Thread.Abort()方法作用于B線程，但是B線程卻不能調用Thread.ResetAbort()來取消Thread.Abort()操作。

vb.net 怎么結束進程

好像不難吧？

我放進了Button1的Click事件里。

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

On Error GoTo Errmessages '在做系統操作時加排錯標簽是個好習慣

Dim TargetName As String = "ibmdict" '存儲進程名為文本型，注：進程名不加擴展名

Dim TargetKill() As Process = Process.GetProcessesByName(TargetName) '從進程名獲取進程

Dim TargetPath As String '存儲進程路徑為文本型

If TargetKill.Length 1 Then '判斷進程名的數量，如果同名進程數量在2個以上，用For循環關閉進程。

For i = 0 To TargetKill.Length - 1

TargetPath = TargetKill(i).MainModule.FileName

TargetKill(i).Kill()

Next

ElseIf TargetKill.Length = 0 Then '判斷進程名的數量，沒有發現進程直接彈窗。不需要的，可直接刪掉該If子句

MsgBox("沒有發現進程！")

Exit Sub

ElseIf TargetKill.Length = 1 Then '判斷進程名的數量，如果只有一個，就不用For循環

TargetKill(0).Kill()

End If

MsgBox("已終止" TargetKill.Length "個進程") '彈窗提示已終止多少個進程

Errmessages: ‘定義排錯標簽

If Err.Description Nothing Then ’判斷有無錯誤，如果有，則 ↓

MsgBox(Err.Description) '當出現錯誤時，彈窗提示

End If

End Sub

可根據需要自行修改，這個備注夠完善了吧？不會的再Hi我。

VB 結束for 循環問題

實話說，我從來沒聽說VB里有return語句，如果是VB.net里有的就當我沒學過孤陋寡聞吧。

我只知道VB里跳出循環是Exit for，而不是什么return。

先不說有沒有return關鍵字，明顯它在j循環的外面，而在i循環的里面，那自然是只對i循環有效果了，怎么可能結束j循環呢？

如果要結束i循環就在那個位置用exit for。如果要線束j循環就在j循環體里用 exit for。

exit for 只結束包含它的最近的一層的循環，懂我的意思么？

return在其它語言里，是表示返回，跳出整個函數，而不是跳出某個循環。

vb.net中關于循環語句 求教大家弱智的問題

要弄清楚這兩個問題，就要明白For循環語句的語法規則：

For循環語句，首先是判斷循環條件，如果循環條件不合理，則循環不執行。

那么看第一個語句，循環范圍是 i = -3.5 to 5.5，顯然這個是一個從-3.5到5.5的遞增范圍，可是后面的Step卻是一個負數，表示以0.5的步長遞減。取值范圍要求從小到大，可是步長改變卻是由大變小，顯然這個循環條件自相矛盾，所以循環將不會執行，也就是循環執行的次數是0次！

如果循環條件合理，則開始執行循環語句，直到根據步長變換，下一個值超出循環范圍則終止。

For j = 6 to 2 Step -2

Next

完整寫法就是：

For j = 6 to 2 Step -2

Next j

Next j的意思就是下一個j值。結合本題，下一個j值等于6-2=4，這個時候，就是循環語句的第二個規則，判斷循環變量的值是否超出循環范圍，我們這里的j=4，顯然是在6 to 2這個范圍之內，所以循環繼續，到下一個j的時候為2，依然在循環范圍內；到這里，6,4,2我們的循環執行了3次，準備第4次循環的時候j = 2 -2 = 0超過了6 to 2這個范圍，那么循環終止。

所以i循環內的每一個j循環將執行3次。

vb.net 有沒有終止某個語句的方法？

定義一個公有布爾值變量 flag，初始值 False。

循環里最開始 If 判斷一下 flag，如果為 True 就 Exit Do 跳出循環，否則繼續循環。

然后在別的函數控制 flag 的值就可以了。

P.S. 你這段代碼是死循環，直到程序占用內存越來越大溢出進而程序崩潰為止……

本文標題：vb.net如何終止循環 VB死循環
文章出自：http://www.yijiale78.com/article24/doddgje.html

成都網站建設公司_創新互聯，為您提供網站排名、手機網站建設、商城網站、網頁設計公司、品牌網站設計、App開發

廣告

聲明：本網站發布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網站立場，如需處理請聯系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經允許不得轉載，或轉載時需注明來源： 創新互聯