Office: Frage zu Besonderheit in VBA

Hallo zusammen!

Oft finde ich Formulierungen die aus meiner Sicht das Gleiche meinen aber dennoch beide unterscheidlich genutzt werden.

If Left$(strPath, 2) = "\\" Then
If Left(strPath, 2) = "\\" Then

Kennt jemand den Hintergrund der $ Formulierung? Wo liegt der Unterschied?

 

Genau genommen könnte man nach einem Hintergrund der "nicht-$" Version fragen... ;-)

Wer relativ früh mit Basic angefangen hat, vielleicht noch BasicA oder GwBasic (zu DOS-Zeiten) benutzt hat, der wird wissen, daß es damals nur die $-Version dieser Funktionen gab.

Damals gab's das DIM aber eigentlich auch nur für Array-Variablen. Ein "option explicit" und ein "dim"-Zwang für jede einzelne Variable gab's da noch nicht (wenn ich mich nicht irre, bin mir aber wenigstens noch zu 80, 90 % sicher). Heute kann man

Code:

DIM Zeichen as String
oder auch
DIM Zeichen$

benutzen, um später im Code dann

Code:

Zeichen$ = "abc"
oder auch
Zeichen = "abc"

zu benutzen.

Damals hätte die 2. Variante zu einem Fehler geführt, weil Zeichenketten nur auf Variablen zugewiesen werden durften, die mit einm $ beendet wurden. Und entsprechend hatten die Funktionen (Left$, Right$, Mid$, Str$, ...) alle ein $ am Ende, um kenntlich zu machen, daß der Rückgabewert eine Zeichenkette ist.

Heute ist das ganze etwas lascher geworden. Solange man im DIM bereits sagt, daß es ein String ist, kann man später das Typkennzeichen (wie bei allen anderen Variablen, z.B. das & für Longint, auch) weg lassen. Entsprechend kann man das $ auch bei den Funktionen weg lassen. Nur konsequent, aber deswegen noch lange nicht schön... Ich schreibe das $ bei diesen Funktionen lieber weiterhin mit. Ich müßte aber, zugegebenermaßen, daß $ auch bei den Variablen anhängen, was ich (leider?) nicht mehr konsequent tue.

Gruß, Michael

 

Hi Michael,

die Verwendung von $ am Ende des Variablennamen ist eine veraltete Schreibweise aus BASIC-Zeiten und bezeichnet den Variablentyp. Heutzutage verwendet man stattdessen Variablenbezeichnungen mit einem Präfix, wobei dieser Präfix den Variablentyp bezeichnet (z.B. Dim strZeichen as String). Eine direkte internationale Festlegung der zu verwendenden Abkürzungen gibt es nicht, allerdings ist als Grundlage für die Abkürzungen (in VBA) allgemein die "Ungarische Notation" anerkannt. Unter dem folgenden Link findest du dazu einige Ausführungen: http://www.it-academy.cc/article/995/Ungarische+Notation+fuer+Visual+Basic.html

Bis später,
Karin

 

Schrieb ich nicht fast genau das? Ich schrieb nur nicht "veraltet", sondern "ursprünglich", denn diese Schreibweise ist eben nicht veraltet. Wäre sie das, würde der Interpreter sie ja als fehlerhaft anmeckern.

Die ursprüngliche Frage hast Du aber schon gelesen, ja? Es ging um die Funktionen Left / Left$. Dort kommt man nicht sehr weit, wenn man strLeft() verwenden wollen würde... ;-)

Das würde ich so pauschal nicht sagen, zumindest nicht mit den Worten "allgemein" und "anerkannt" im selben Satz. Diese Präfix-Geschichten kenne ich schon, seitdem ich mit Access 2 und Excel 4 unter Windows 3 gearbeitet habe. Und trotzdem sehe ich heute noch, 20(?) Jahre später, eine große Mehrheit, 70 bis 80% vielleicht, an Sourcen, die sich eben nicht an diese Konvention halten (wollen).

Das hängt aber wohl auch damit zusammen, daß es im Basic eben
- Variablen-Typkennzeichen ($, &, ...) gibt
- den Variablentyp "Variant" gibt
- ein sehr laxes Typecasting gibt

Diese Konvention macht in jedem Fall Sinn in Sprachen, wo es diese Kennzeichen eben nicht gibt. Natürlich läßt sie sich auch prima auf Basic übertragen, ist dort aber lange nicht so zwingend. In Pascal würde ich ein Riesengemecker kriegen, wenn ich
lngZeile := 5;
strZelle := 'C' + lngZeile;
versuchen würde. In Basic ist aber
lngZeile = 5
strZelle = "C" & lngZeile
überhaupt kein Problem.

Gruß, Michael