| |  | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte | | |  | PNY präsentiert die neue NVIDIA RTX A400 und die A1000 Grafikkarte, eine Pressemitteilung
|
Autor
|
Thema: Try wird nicht ausgeführt (429 / mal gelesen)
|
Fiedel93felix Mitglied Konstrukteur
 
 Beiträge: 488 Registriert: 19.02.2014 Autodesk Inventor 2025 AutoCAD Mechanical 2025 Microsoft Visual Basic 2022
|
erstellt am: 23. Mrz. 2023 11:20 <-- editieren / zitieren --> Unities abgeben:         
Hallo miteinander, ich habe seit kurzen ein Problem mit der Programmierung. Wenn ich etwas in meinen Programmen änder und dann neu erstelle werden Try Catch Anweisungen nicht mehr richtig ausgeführt. Beispiel: Code:
Try MsgBox("11") Dim HilfTol As String = "" HilfTol = Builder.CustomPropertyTable.Item("MBDi").ToString.Replace(" ", "") HilfTol = HilfTol.Replace(",", ".") If HilfTol.Contains("+") Or HilfTol.Contains("-") Or HilfTol.Contains("±") Or HilfTol.Contains("%%P") Or HilfTol.Contains("%%p") Then If HilfTol.Contains("+") Then BDi = Mid(HilfTol, 1, InStr(HilfTol, "+") - 1) End If If HilfTol.Contains("-") Then BDi = Mid(HilfTol, 1, InStr(HilfTol, "-") - 1) End If If HilfTol.Contains("±") Then BDi = Mid(HilfTol, 1, InStr(HilfTol, "±") - 1) End If If HilfTol.Contains("%%P") Then BDi = Mid(HilfTol, 1, InStr(HilfTol, "%%P") - 1) End If If HilfTol.Contains("%%p") Then BDi = Mid(HilfTol, 1, InStr(HilfTol, "%%p") - 1) End If Else BDi = Builder.CustomPropertyTable.Item("MBDi") End If
MsgBox("2") Catch ex As Exception End Try MsgBox("3")
Der Code läuft bei mir schon seit über 8 Jahren so und jetzt kommt hier der Fehler aus dem Anhang. (Msgbox("11") wird angezeigt und danach kommt der Fehler, beim Fehler sollte ja eigentlich in Catch gesprungen werden und dann würde es Msgbox("3") anzeigen....)
------------------ ---------------------------------- Mit freundlichen Grüßen Felix Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Brischke Moderator CAD on demand GmbH
       

 Beiträge: 4191 Registriert: 17.05.2001 AutoCAD 20XX, defun-tools
|
erstellt am: 23. Mrz. 2023 11:44 <-- editieren / zitieren --> Unities abgeben:          Nur für Fiedel93felix
... bist du beim Debuggen mal zeilenweise durch das Programm gegangen? Mach das mal, dann siehst du, in welcher Zeile der Fehler verursacht wird. Ich wüsste jetzt keine Zeile in dem Codeausschnitt, die diesen Fehler überhaupt auslösen könnte. Grüße! Holger ------------------ Holger Brischke CAD on demand GmbH Individuelle Lösungen von Heute auf Morgen.
 defun-tools Das Download-Portal für AutoCAD-Zusatzprogramme!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Fiedel93felix Mitglied Konstrukteur
 
 Beiträge: 488 Registriert: 19.02.2014 Autodesk Inventor 2025 AutoCAD Mechanical 2025 Microsoft Visual Basic 2022
|
erstellt am: 23. Mrz. 2023 12:00 <-- editieren / zitieren --> Unities abgeben:         
Der Fehler entsteht in der Zeile: Code:
HilfTol = Builder.CustomPropertyTable.Item("MBDi").ToString.Replace(" ", "")
Aber das ist ja auch egal....Es geht darum warum das Programm nicht in Catch springt (so wie die letzten Jahren immer). Dafür ist Try Catch ja da! ------------------ ---------------------------------- Mit freundlichen Grüßen Felix Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
| Anzeige.:
Anzeige: (Infos zum Werbeplatz >>)
 |