Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  CATIA V5 Programmierung
  Select case ... case 5 To 10

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
Autor Thema:  Select case ... case 5 To 10 (1241 mal gelesen)
Tim2007
Mitglied
Konstrukteur


Sehen Sie sich das Profil von Tim2007 an!   Senden Sie eine Private Message an Tim2007  Schreiben Sie einen Gästebucheintrag für Tim2007

Beiträge: 143
Registriert: 02.01.2007

Catia V5R19SP3 XP64<P>"Was wir wissen, ist ein Tropfen; was wir nicht wissen, ein Ozean." Sir Isaac Newton

erstellt am: 01. Aug. 2011 17:34    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hi Macro-Freunde,

bitte helft mir den richtigen Wortlaut für CATScript zu finden.
Umter VBA läuft das, jedoch nicht unter CATScript.

Gibt es hier einen Trick?

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

bgrittmann
Moderator
Konstrukteur


Sehen Sie sich das Profil von bgrittmann an!   Senden Sie eine Private Message an bgrittmann  Schreiben Sie einen Gästebucheintrag für bgrittmann

Beiträge: 11780
Registriert: 30.11.2006

CATIA V5R19

erstellt am: 01. Aug. 2011 17:52    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Tim2007 10 Unities + Antwort hilfreich

Servus
Du könntest die Werte ausschreiben:
Code:
Case 5, 6, 7, 8, 9, 10

Gruß
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Tim2007
Mitglied
Konstrukteur


Sehen Sie sich das Profil von Tim2007 an!   Senden Sie eine Private Message an Tim2007  Schreiben Sie einen Gästebucheintrag für Tim2007

Beiträge: 143
Registriert: 02.01.2007

Catia V5R19SP3 XP64<P>"Was wir wissen, ist ein Tropfen; was wir nicht wissen, ein Ozean." Sir Isaac Newton

erstellt am: 02. Aug. 2011 09:46    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Danke Bernd,

mein Problem ist nur, dass ich Dimensionen von z. B. 0,001 - 1,999 nehmen will und  - da Case nur ganze Zahlen verarbeiten kann - ich dann daraus 1 - 1999 mache. Das würde bedeuten, dass ich alle 2000 Zahlen eingeben müsste 

In VBA direkt funktioniert das ja, aber eben in dem dussligen Macro-Standard-Editor mit CATScript nicht.

Andere Vorschläge?

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

bgrittmann
Moderator
Konstrukteur


Sehen Sie sich das Profil von bgrittmann an!   Senden Sie eine Private Message an bgrittmann  Schreiben Sie einen Gästebucheintrag für bgrittmann

Beiträge: 11780
Registriert: 30.11.2006

CATIA V5R19

erstellt am: 02. Aug. 2011 10:15    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Tim2007 10 Unities + Antwort hilfreich

Servus
Du könntest statt den "Select-case"-Abfrage mehrere if-Abfrage verwenden (ist zwar nicht schön). (if x > 0 and x < 2 then)

Gruß
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

[Diese Nachricht wurde von bgrittmann am 02. Aug. 2011 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Tim2007
Mitglied
Konstrukteur


Sehen Sie sich das Profil von Tim2007 an!   Senden Sie eine Private Message an Tim2007  Schreiben Sie einen Gästebucheintrag für Tim2007

Beiträge: 143
Registriert: 02.01.2007

Catia V5R19SP3 XP64<P>"Was wir wissen, ist ein Tropfen; was wir nicht wissen, ein Ozean." Sir Isaac Newton

erstellt am: 02. Aug. 2011 11:24    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hi Bernd,

danke, dass ist auch eine Lösung.
Mir ging es aber prinzipiel darum zu verstehen, ob ich eine Einstellung wie "Language = VBScript" vergessen hatte oder ob der Editor das einfach nicht kann.

Denke halt immer, dass ich falsch arbeite und hier was vergessen habe.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

HoBLila
Mitglied
Dipl.-Ing. (BA) praktische Informatik - Senior Entwickler CAx


Sehen Sie sich das Profil von HoBLila an!   Senden Sie eine Private Message an HoBLila  Schreiben Sie einen Gästebucheintrag für HoBLila

Beiträge: 1118
Registriert: 29.05.2008

DELL PRECISION T3500
Intel(R) Xeon(R) CPU W3540 @ 2.93GHz
12285 MB RAM
NVIDIA Quadro FX 1800
Microsoft Windows 7 Enterprise Service Pack 1
CATIA V5 R19 SP09 HF69
VB6.5
CAA RADE CDC

erstellt am: 02. Aug. 2011 13:06    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Tim2007 10 Unities + Antwort hilfreich

VBS ist eben leider viel rudimentärer, als VBA, weshalb einige "neuere" Sachen nicht gehen.

Man kann in VBS z.B. auch nicht noch einmal den Variablennamen hinter das Next schreiben und so weiter.

Da es aber so rudimentär ist funktioniert es eben auch unter Unix.

Sprungmarken gibt es z.B. auch nicht, wobei das nicht so schlimm ist, was eher schlimm ist, dass VBS mit Variablendeklarationen nicht umgehen kann.

Manchmal muss man dadurch leider seinen Code umbauen. :-(

Mit If/EleIf kommst Du jedoch schon recht weit.

Eine weitere Option wäre eine Modulo oder Div-Operator für Deine Bereiche. Also Rechnen mit Rest oder Ganzzahl.
Schau mal hier:http://msdn.microsoft.com/de-de/library/se0w9esz%28v=vs.80%29.aspx

Weiß ja nicht ob es mehrere Fälle gibt, wenn es sowieso nur zwei Fälle gibt, dann ist eine CASE-Anweisung sowieso zu viel, da If weniger Auswand und weniger Performanceverlust bedeutet.

------------------
Mit freundlichen Grüßen,
Henry Schneider
alias Lila

Es gibt einen ewigen Wettkampf zwischen der Natur und den Ingenieuren:
Die Ingenieure versuchen, immer idioten-sicherere Systeme zu bauen,
die Natur versucht, immer bessere Idioten zu bauen

Xing

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Tim2007
Mitglied
Konstrukteur


Sehen Sie sich das Profil von Tim2007 an!   Senden Sie eine Private Message an Tim2007  Schreiben Sie einen Gästebucheintrag für Tim2007

Beiträge: 143
Registriert: 02.01.2007

Catia V5R19SP3 XP64<P>"Was wir wissen, ist ein Tropfen; was wir nicht wissen, ein Ozean." Sir Isaac Newton

erstellt am: 02. Aug. 2011 14:50    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hi Henry,

danke für die Info.
Habe ca. 20 Schleifen und es war igrnedwie nervig das alles umzuschreiben.
Jetzt habe ich allerdings das Problem, dass er immer die erste Schleife nimmt und nicht die entsprechende.
Unter VBA funktioniert das allerdings!?!

Kann es sein, dass der rudimentäre Macroeditor die Nachkommazahlen nicht verträgt?

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

bgrittmann
Moderator
Konstrukteur


Sehen Sie sich das Profil von bgrittmann an!   Senden Sie eine Private Message an bgrittmann  Schreiben Sie einen Gästebucheintrag für bgrittmann

Beiträge: 11780
Registriert: 30.11.2006

CATIA V5R19

erstellt am: 02. Aug. 2011 15:25    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Tim2007 10 Unities + Antwort hilfreich

Servus
Wie hast du das Komma eingegeben, wie die Zahlen?
AFAIR ist der Dezimaltrenner in VB "."

Gruß
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Tim2007
Mitglied
Konstrukteur


Sehen Sie sich das Profil von Tim2007 an!   Senden Sie eine Private Message an Tim2007  Schreiben Sie einen Gästebucheintrag für Tim2007

Beiträge: 143
Registriert: 02.01.2007

Catia V5R19SP3 XP64<P>"Was wir wissen, ist ein Tropfen; was wir nicht wissen, ein Ozean." Sir Isaac Newton

erstellt am: 02. Aug. 2011 16:25    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hi,

im VBA-Editor ist es unter dem Watches-Fenster als Typ Long und Ganzzahlig dargestellt.
Mache ich dasselbe im Macro-Editior, kommen da Zahlen mit Kommas.

Weiß der Geier wieso dies unterschiedlich dargestellt wird.
Wenn ich nun Round(xyz,0) mache ändert das zwar die Kommas - die gibt es dann nicht - aber er nimmt dann immer nur noch die erste Schleife!?!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

bgrittmann
Moderator
Konstrukteur


Sehen Sie sich das Profil von bgrittmann an!   Senden Sie eine Private Message an bgrittmann  Schreiben Sie einen Gästebucheintrag für bgrittmann

Beiträge: 11780
Registriert: 30.11.2006

CATIA V5R19

erstellt am: 02. Aug. 2011 16:56    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Tim2007 10 Unities + Antwort hilfreich

Servus
Poste mal bitte den Code.
EDIT: Lass dir mal den Wert der entsprechenden Variable vor der if-Abfrage in einer Messagebox ausgeben. Viellicht liegt es nicht an den If-Abfragen.

Gruß
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

[Diese Nachricht wurde von bgrittmann am 02. Aug. 2011 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2023 CAD.de | Impressum | Datenschutz