| | |
 | CATIA V5 Grundkurs | Einsteiger - 5 Std. 15 Min 48 |
| | |
 | KISTERS 3DViewStation optimiert die Lizenzverwaltung für ihre Kunden, eine Pressemitteilung
|
|
Autor
|
Thema: Case und Continue For (996 / mal gelesen)
|
Sylas
Mitglied
   Beiträge: 349
Registriert: 19.11.2012 Dell Precision T3500
Intel Xeon W3550 @ 3,07 GHz
12 GB RAM
CATIA V5 R28
|
erstellt am: 24. Aug. 2017 12:11  <-- editieren / zitieren -->   Unities abgeben:          
Hallo Zusammen Kann mir jemand ein Tipp geben, wie kann ich Sonderfall mit Case Else handeln? Ich möchte mit Sonderfall das Document überspringen... Code:
For Each oDoc In CATIA.Documents
Select Case TypeName(oDoc)
Case "PartDocument"
doc_old_name = oDoc.Part.Name
doc_new_name = Replace(oDoc.Part.Name, GUI.txtBxOld.Text, GUI.txtBxNew.Text)
oDoc.Product.PartNumber = doc_new_name
Case "ProductDocument"
doc_old_name = oDoc.Product.PartNumber
doc_new_name = Replace(oDoc.Product.PartNumber, GUI.txtBxOld.Text, GUI.txtBxNew.Text)
oDoc.Product.PartNumber = doc_new_name
Case Else
Continue for '<-- das hier funktioniert nicht :(
End Select
Next
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
bgrittmann
Moderator
Konstrukteur
    
Beiträge: 12054
Registriert: 30.11.2006 CATIA V5R19
|
erstellt am: 24. Aug. 2017 12:23 <-- editieren / zitieren --> Unities abgeben: Nur für Sylas 
|
RSchulz
Ehrenmitglied V.I.P. h.c.
Head of CAD, Content & Collaboration / IT-Manager
Beiträge: 5541
Registriert: 12.04.2007 @Work
Lenovo P510
Xeon E5-1630v4
64GB DDR4
Quadro P2000
256GB PCIe SSD
512GB SSD
SmarTeam V5-6 R2016 Sp04
CATIA V5-6 R2016 Sp05
E3.Series V2019
Altium Designer/Concord 19
Win 10 Pro x64
|
erstellt am: 24. Aug. 2017 12:35 <-- editieren / zitieren --> Unities abgeben: Nur für Sylas
|
Sylas
Mitglied
Beiträge: 349
Registriert: 19.11.2012 Dell Precision T3500
Intel Xeon W3550 @ 3,07 GHz
12 GB RAM
CATIA V5 R28
|
erstellt am: 24. Aug. 2017 14:07 <-- editieren / zitieren --> Unities abgeben:
Zitat:
Original erstellt von bgrittmann:
Servus SylasKannst du nicht einfach das Case Else ganz weglassen?
Dann wird in deinem Beispiel ja das next ausgeführt. Gruß
Bernd
Zitat:
Original erstellt von RSchulz:
Das sehe ich auch so. Das Case else macht in deinem Fall keinen Sinn. Entweder leer lassen oder garnicht erst angeben. Nutzen könntest du das z.B. für Logging oder eine MSGBOX oder eine alternative Behandlung. Ist dies nicht notwendig, ist es definitiv keine Kunst und kann weg 
Danke Ihr beide für die Antwort - Die einfachste Lösung ist manchmal die beste Lösung!
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Foren auf CAD.de
| 
