是VB
義縣網(wǎng)站建設公司成都創(chuàng)新互聯(lián)公司,義縣網(wǎng)站設計制作,有大型網(wǎng)站制作公司豐富經驗。已為義縣上1000家提供企業(yè)網(wǎng)站建設服務。企業(yè)網(wǎng)站搭建\外貿營銷網(wǎng)站建設要多少錢,請找那個售后服務好的義縣做網(wǎng)站的公司定做!
6么?如果是Win
7的話,建議你關掉Aero,而且需要使用管理員身份運行,這樣才能完全兼容Win
7。如果不會,可以到我的Blog看看這篇文章:
1、可能進入了死循環(huán),仔細檢查代碼有無這種情況。
2、無用的數(shù)據(jù)一直在累積而沒有及時銷毀,導致內存占用越來越大,最終崩潰。要注意對象隨用隨清,及時 Dispose 掉或調用 GC.Collect。
好像不難吧?
我放進了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)操作時加排錯標簽是個好習慣
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)關閉進程。
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: ‘定義排錯標簽
If Err.Description Nothing Then ’判斷有無錯誤,如果有,則 ↓
MsgBox(Err.Description) '當出現(xiàn)錯誤時,彈窗提示
End If
End Sub
可根據(jù)需要自行修改,這個備注夠完善了吧?不會的再Hi我。
這個問題是兼容性問題,一般是win7或win8,win10上運行的VB程序會出現(xiàn)。
簡單的說,調用了系統(tǒng)的某些api或者引用了某些動態(tài)鏈接庫。
解決辦法有兩個:自己上網(wǎng)查查,請別人幫忙。
你的數(shù)據(jù)類型錯誤
Dim int1 As String
int1 = "你好"
應該是.net framework版本不對造成的,不可能是缺少dll,.net平臺的程序缺少dll并不會閃退,只會有錯誤對話框.
也有可能是操作系統(tǒng)環(huán)境不一致導致閃退,比如win8生成的程序轉到xp上用.
標題名稱:vbnet停止工作,vb已停止工作
鏈接地址:http://chinadenli.net/article16/dsisddg.html
成都網(wǎng)站建設公司_創(chuàng)新互聯(lián),為您提供電子商務、網(wǎng)站改版、網(wǎng)站導航、服務器托管、移動網(wǎng)站建設、商城網(wǎng)站
聲明:本網(wǎng)站發(fā)布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創(chuàng)新互聯(lián)