| | | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte | | | | PNY WIRD VON NVIDIA ZUM HÄNDLER DES JAHRES GEWÄHLT, eine Pressemitteilung
|
Autor
|
Thema: Try wird nicht ausgeführt (299 / mal gelesen)
|
Fiedel93felix Mitglied Konstrukteur
Beiträge: 482 Registriert: 19.02.2014 Autodesk Inventor 2022 AutoCAD Mechanical 2021 Microsoft Visual Basic 2010
|
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: 4187 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: 482 Registriert: 19.02.2014 Autodesk Inventor 2022 AutoCAD Mechanical 2021 Microsoft Visual Basic 2010
|
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 >>)
|