vb.net 怎么結(jié)束進程

好像不難吧？

創(chuàng)新互聯(lián)公司提供網(wǎng)站設(shè)計制作、成都網(wǎng)站設(shè)計、網(wǎng)頁設(shè)計，成都品牌網(wǎng)站建設(shè)，1元廣告等致力于企業(yè)網(wǎng)站建設(shè)與公司網(wǎng)站制作，10多年的網(wǎng)站開發(fā)和建站經(jīng)驗,助力企業(yè)信息化建設(shè)，成功案例突破1000+,是您實現(xiàn)網(wǎng)站建設(shè)的好選擇.

我放進了Button1的Click事件里。

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

On Error GoTo Errmessages '在做系統(tǒng)操作時加排錯標(biāo)簽是個好習(xí)慣

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

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

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

If TargetKill.Length 1 Then '判斷進程名的數(shù)量，如果同名進程數(shù)量在2個以上，用For循環(huán)關(guān)閉進程。

For i = 0 To TargetKill.Length - 1

TargetPath = TargetKill(i).MainModule.FileName

TargetKill(i).Kill()

Next

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

MsgBox("沒有發(fā)現(xiàn)進程！")

Exit Sub

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

TargetKill(0).Kill()

End If

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

Errmessages: ‘定義排錯標(biāo)簽

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

MsgBox(Err.Description) '當(dāng)出現(xiàn)錯誤時，彈窗提示

End If

End Sub

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

vb.net 程序運行久了以后崩潰

1、可能進入了死循環(huán)，仔細檢查代碼有無這種情況。

2、無用的數(shù)據(jù)一直在累積而沒有及時銷毀，導(dǎo)致內(nèi)存占用越來越大，最終崩潰。要注意對象隨用隨清，及時 Dispose 掉或調(diào)用 GC.Collect。

VB.NET 錯誤中斷問題

不可以的，但是出現(xiàn)錯誤的時候不是已經(jīng)告訴你在多少行了嗎？你把行號顯示出來就可以了。

顯示行號的方法：工具選項文本編輯器basic編輯器

這項下有個行號，你打鉤就好了。

這樣一來報錯的時候，提示在多少行，你就到多少行去看。如果你沒有用try的話，錯誤在哪里，ide會在錯誤的位置給你標(biāo)示出來。

VB.net怎么這么容易崩潰（簡單的賦值錯誤）？

你的數(shù)據(jù)類型錯誤

Dim int1 As String

int1 = "你好"