Berechnungen mit Visual Basic Script werden in MIKE URBAN eingesetzt, um

• mit der Feldberechnung (Field Calculator) Werte in einer Tabellenspalte zu berechnen, und
• komplexere Beschriftungsausdrücke (Label) zu erstellen.

Eine komplette Referenz bietet zB. das VBScript-Sprachverzeichnis.

Siehe auch FormatNumber!

Gibt eine auf die angegebene Anzahl Dezimalstellen gerundete Zahl zurück. Lässt man die Anzahl der Dezimalstellen weg, wird auf ganze Zahlen gerundet.

Round(Ausdruck[, AnzDezimalstellen])
Round([Laenge], 2)

Es wird nach wissenschaftlichen Prinzipien gerundet. Wenn beide Zahlen gleich weit entfernt sind, wird

• abgerundet, wenn die letzte vebleibende Stelle gerade ist (47,225), und
• aufgerundet, wenn die letzte verbleibende Stelle ungerade ist (47,235).

Dadurch ist gewährleistet, dass der Mittelwert einer Datenmenge nach dem Runden gleich bleibt, weil im Mittel genauso oft auf- wie abgerundet wird.

Gibt eine bestimmte Anzahl von Zeichen ab dem ersten (linken) Zeichen einer Zeichenfolge zurück.

Left(Zeichenfolge, Länge)

Gibt eine bestimmte Anzahl von Zeichen aus einer Zeichenfolge zurück.

Mid(Zeichenfolge, Start[, Länge])

• Start: legt den Beginn des Ausschnitts fest. Das erste Zeichen der Zeichenfolge hat die Position 1!
• Länge: Die Angabe der Länge ist optional.

Mid([Profil],4,Len([Profil])-5)

Gibt eine bestimmte Anzahl von Zeichen vom rechten Teil (dem Ende) einer Zeichenfolge zurück.

Right(Zeichenfolge, Länge)
Right([EG],3)

Zeichenfolgen werden mit dem kaufmännischen & verkettet.

"Ich bin mit " & "diesem Teil verkettet."

Ergebnis:

Ich bin mit diesem Teil verkettet.

Teilt die Zeichenfolge anhand eines bestimmten Trennzeichens und gibt ein eindimensionales Datenfeld zurück, das alle Teilzeichenfolgen enthält.

Split(Ausdruck, Trennzeichen)

Weil das Ergebnis von Split nicht ein Einzelwert, sondern ein Datenfeld ist, muss man zusätzlich mit Index die Zeichenfolge an der gewünschten Position ansprechen.¹⁾

Split(Ausdruck, Trennzeichen)(Index)

• Ausdruck: zu teilende Zeichenfolge
• Trennzeichen: einzelnes Zeichen, an dem geteilt werden soll
• Index: gibt an, welcher Teil aus dem Datenfeld zurückgegeben werden soll. Beachten Sie, dass die erste Zeichenfolge den Index 0 trägt, die zweite Zeichenfolge den Index 1 etc.

Die Linke Spalte "Haltung" enthält Profiltyp, Höhe und Material, jeweils getrennt durch einen Unterstrich. Mit

Split([Haltung], "_")(1)

erhält man das Ergebnis:

Mit

Split([Haltung], "_")(2)

erhält man das Ergebnis

Eine Fehlermeldung im Stil
Error running VBA code : user interrupt.
und dann
Index außerhalb des gültigen Bereichs: '[number: 1]'
weist darauf hin, dass in einem Datensatz MeinDatenfeld(1) nicht berechnet werden konnte, z.B. wenn im obigen Beispiel die zweite Zeile nur "DN1000" enthalten würde. Umgehen Sie das Problem, indem Sie eine Auswahl mit den Datensätzen erstellen, die korrekt zerlegt werden können.

Gibt eine Zeichenfolge zurück, in der eine bestimmte Teilzeichenfolge durch eine andere Zeichenfolge so oft wie angegeben ersetzt wurde.

Replace(Ausdruck, SuchZF, ErsetzenDurch[, Start[, Anzahl]])

• Ausdruck: zu durchsuchender Text
• SuchZF: Suchzeichenfolge
• ErsetzenDurch: Ersatzzeichenfolge
• Start (optional; immer in Verbindung mit Anzahl): Position in Ausdruck, an der die Suche begonnen soll
• Anzahl (optional; immer in Verbindung mit Start): Maximale Anzahl der Ersetzungen in Ausdruck

Das folgende Beispiel ersetzt Leerzeichen im Feld MUID durch den Unterstrich. In der praktischen Anwendung braucht diese Berechnung einigermaßen lang, weil von der MUID abhängige Tabellen ebenfalls neu berechnet werden, daher mit Vorsicht und Umsicht anwenden!

Replace([MUID] , " " , "_" )

Die linke Spalte enthält Höhenangaben als Text. Weil das Dezimaltrennzeichen in den Ländereinstellungen auf Komma gesetzt ist, muss der Punkt durch ein Komma erstetzt werden.

Die rechte Spalte hat das Format Double. Die Berechnung besteht aus zwei Teilen. Mid() holt den Textteil ab der dritten Position, und Replace ersetzt den Punkt durch ein Komma.

Replace(Mid([HoeheTxt],3) , "." , "," )

Gibt einen als Zahl formatierten Ausdruck zurück.

FormatNumber(Ausdruck[,AnzDezimalen [,FolgendeNull [,NegativKlamer [,ZiffGruppe]]]])

• Ausdruck: zu formatierender Ausdruck
• AnzDezimalen (optional): Anzahl der Dezimalstellen oder -2…Ländereinstellungen verwenden (Voreinstellung)
• FolgendeNull (optional): Sollen Nullen nach dem Komma angezeigt werden? -1…Ja, 0…Nein, -2…Ländereinstellungen berücksichtigen (Voreinstellung)
• NegativKlammer (optional): Sollen negative Werte in Klammer gesetzt werden? -1…Ja, 0…Nein, -2…Ländereinstellungen berücksichtigen (Voreinstellung)
• ZiffGruppe (optional): Sollen Ziffern gruppiert werden? -1…Ja, 0…Nein, -2…Ländereinstellungen berücksichtigen (Voreinstellung)

Links stehen Durchflussmengen, rechts sieht man das Ergebnis mit zwei fixen Dezimalstellen, wie es beim Labeln des Lageplans angezeigt wird.

FormatNumber([Durchfluss],2,-1)

FormatNumber hat wahrscheinlich nur beim Labeln Sinn. Zum Berechnen von Feldern taugt es nicht, weil in den numerischen Feldern ja nur der Wert gespeichert wird, nicht deren Darstellung.

Runden testen