VB 書上一個(gè)例題，我按書敲了程序。程序運(yùn)行時(shí)報(bào)錯(cuò)： “標(biāo)簽沒(méi)定義”在VB中標(biāo)簽如何定義，請(qǐng)老師給予幫助

熱心網(wǎng)友

!!!!!!!!知道了,對(duì)不起剛剛看到郵件正如我所說(shuō),你的errorhandle:在sub外面刪掉errorHandle:前的end sub,改成exit sub才行祝你新年好運(yùn)

熱心網(wǎng)友

On Error GoTo ErrorHandle...ErrorHandle:你得定義一個(gè)句柄名稱呀，要不不得出錯(cuò)呀！一般不建議使用on error resume next,這樣程序出錯(cuò)不好檢測(cè).

熱心網(wǎng)友

好象沒(méi)有問(wèn)題,出現(xiàn)此提示是定義的錯(cuò)誤句柄名稱不存在.比如:onerrorgotoErrorHandle.......onerrorgoto0'取消容錯(cuò)處理Er 0then....endif一般不建議使用onerrorresumenext,這樣程序出錯(cuò)不好檢測(cè).

熱心網(wǎng)友

按說(shuō)不應(yīng)當(dāng)有問(wèn)題的，我通常也這么用啊。仔細(xì)看看是不是那里打錯(cuò)了？實(shí)在不行就on error resume next是編寫軟件中最好的選擇，呵呵。

熱心網(wǎng)友

下面是MSDN里的一個(gè)例子，請(qǐng)注意前面帶*號(hào)的句子。（用的時(shí)候記得吧*號(hào)去掉）Sub OnErrorStatementDemo() On Error GoTo ErrorHandler ' 打開錯(cuò)誤處理程序。 Open "TESTFILE" For Output As #1 ' 打開輸出文件。 Kill "TESTFILE" ' 試圖刪除已打開的文件。 On Error Goto 0 ' 關(guān)閉錯(cuò)誤陷阱。 On Error Resume Next ' 改變錯(cuò)誤陷阱。 ObjectRef = GetObject("MyWord。Basic") ' 試圖啟動(dòng)不存在 ' 的對(duì)象'檢查可能發(fā)生的 Automation 錯(cuò)誤。 If Err。Number = 440 Or Err。Number = 432 Then ' 告訴用戶出了什么事。然后清除 Err 對(duì)象。 Msg = "There was an error attempting to open the Automation object!" MsgBox Msg, , "Deferred Error Test" Err。Clear ' 清除 Err 對(duì)象字段。 End If *Exit Sub ' 退出程序，以避免進(jìn)入錯(cuò)誤處理程序。ErrorHandler: ' 錯(cuò)誤處理程序。 Select Case Err。Number ' 檢查錯(cuò)誤代號(hào)。 Case 55 ' 發(fā)生“文件已打開”的錯(cuò)誤。 Close #1 ' 關(guān)閉已打開的文件。 Case Else ' 處理其他錯(cuò)誤狀態(tài) 。 。 。 End Select* Resume ' 將控制返回到產(chǎn)生錯(cuò)誤的語(yǔ)句。*End Sub。