[Pregunta] VBS Funktionen - Befehl 'Round'


Servus!

Ich schreibe mir gerade die eine oder andere Funktion zum Beschriften unserer Bauteile und zur Erleichterung für meine Lieblingskollegen.

Soweit ist auch alles schon ganz gut und ich bin zufrieden. Dennoch haben sich kürzlich drei Fragen aufgetan:

  • (1)_Ich möchte gerne meine Abmessungen auf 0,5CM genau in den BSB abbbilden. Das habe ich bis dato noch nicht wirklich geschafft. Liegt es am Zahlenformat, liegt es am Rundungsbefehl Round, liegt es am Wetter ... ?
    Ergebnis sollte so sein 10.00 bis 10.24 -> 10 (ohne Nullstelle); 10.25 bis 10.74 -> 10.5; 10.75 bis 10.99 -> 11 (ohne Nullstelle).
    Aus den bereits vorhandenen Standardfunktionen in Allplan werde ich da noch nicht so ganz schlau.
  • (2)_Meine Raumbeschriftung soll aus mehreren Zeilen bestehen. Grundsätzlich sind 4 der 5 Zeilen gleich groß. Eine ist größer, Sie soll aber eine definierte Schriftgröße erhalten, nicht einfach mit " %> " vergrößert werden.
    Gibt es einen Befehl in VBS mit dem ich dass bewerkstelligen kann?
    (3)_Ebendiese 5 Zeilen liegen auf 3 unterschiedlichen Layern. Diese Layer-Information - sprich eine explizite Layerzuordnung - soll meine Funktion auch können. Dazu habe ich noch gar nichts gesucht, denke aber, dass es möglich ist.
Groß ist der Kreis der Informationslieferanten sicherlich nicht, hoffe aber dass nicht alle gleichzeitig auf Urlaub sind.

Gruß, Martin

Bautechnik GmbH. | A-2100 Korneuburg | Raiffeisenstraße 1

Show most helpful answer Hide most helpful answer

1. Runden auf halbe Zentimeter
Zentimeter mal 2, dann runden, danach /2
z.B. für OK (mm) : ROUND(2*@98@/10;0)/200

2. Anzeige als Hochzahl
Format F8.3 einstellen, und bei Dimension:
-(Dimension nicht darstellen)
-Letztes Zeichen Hochgestellt
-Nullen bei Nachkommastellen unterdrücken

1. Runden auf halbe Zentimeter
Zentimeter mal 2, dann runden, danach /2
z.B. für OK (mm) : ROUND(2*@98@/10;0)/200

2. Anzeige als Hochzahl
Format F8.3 einstellen, und bei Dimension:
-(Dimension nicht darstellen)
-Letztes Zeichen Hochgestellt
-Nullen bei Nachkommastellen unterdrücken

Bei der Funktion round kann s CH mit zwei Optionen gearbeitet werden... Round(66.666642;3;5) gibt rundet auf 5mm

Namenlos gezeichnet in vollem Bewusstsein - ignorant, in eigen Augen vermutlich höflich, dennoch unhöflichst, unfreundlichst wer einen/viele vermutete - sich von alters erschließende Namen nennt.
08.01.2024 - Gegen Bauernsperren! -> Boykott der direktverkaufenden Bauern - kauft nicht mehr direkt bei Bauern!

zu 3. - die einzelnen Zeilen dem entsprechenden Layer zuordnen und dann erst das Beschriftungsbild final definieren. Die jeweilige Zeile ist dann allerdings fest mit dem Layer verheiratet, kann aber jederzeit wieder auf ein anderes Layer geschoben werden.

Servus!

Dankeschön für Eure Antworten!

Ich habe mich offensichtlich in meinem Beitrag ganz schlecht ausgedrückt, wie ich feststelle!

Eure Antworten beziehen sich auf die Eingabe direkt in Allplan. Diese Möglichkeiten sind mir alle bekannt, sie sind alle bereits in Verwendung.

Also neuer Versuch:
Meine Fragen zielen auf Funktionen welche ich als VB-Skript definiere...
Dieser wertvolle Zusatz "VB-Skript" hat es nicht in meinem Originalbeitrag geschafft!

Sorry für die Verwirrung!

@Nemo
Deine 1. Antwort auf meine Fragen kann aber möglicherweise auch im VB-Skript funktionieren...

... neuer Versuch!

hitzige Grüße, Martin

Bautechnik GmbH. | A-2100 Korneuburg | Raiffeisenstraße 1


https://campus.allplan.com/ utiliza cookies  -  Aqui

Acéptalo