Hilfe ! Wie bringe ich diesen Fehler weg

[vbspeed]

Hy,

Ich habe eine trimmfunktion geschrieben
aber bekomme immer eine Fehlermeldung
wenn ich es compilieren will. Aus dem VB
heraus läuft es wunderbar.

Hier der Code:

 Private Function Trim(ByVal InString As String) As String
Trim = LTrim(RTrim(InString))
End Function
'---------------------------------------------------------------------------------------------------------- 
Public Function LTrim(ByVal InString As String) As String
While InStr(Chr$(0) + Chr$(9) + Chr$(32), Left$(InString, 1)) > 0
	InString = Mid$(InString, 2)
Wend
LTrim = InString
End Function
'---------------------------------------------------------------------------------------------------------- 
Public Function RTrim(ByVal InString As String) As String
While InStr(Chr$(0) + Chr$(9) + Chr$(32), Right$(InString, 1)) > 0
	InString = Left$(InString, Len(InString) - 1)
Wend
RTrim = InString
End Function

Und hier der Text der Fehlermeldung:
Type-declaration character does not match declared data type

Frage: Wie bekomme ich diesen code zum compilieren ohne
dass diese Fehlermeldung kommt ?

Danke schonmal im voraus.

mfg. VbSpeed

 

[spirit]

Hallöchen

Diese Fehlermeldung besagt, das du einen Wert in eine Variable schreiben möchtest, für die der Variablentyp nicht geeignet ist.

 

[NRFi]

Kannst ja mal als erstes die + mit & ersetzen.

 

[vbspeed]

Servus,

Erstmal das mit den "+ durch &" ersetzen hat
leider nicht geklappt.

Und mir ist aufgefallen das es das es überall
wo in meinem Projekt "Right$" steht
einen fehler bringt.

Komischerweise funktioniert es mit "Left$" einwandfrei.

Woran kann das liegen

Mfg. VbSpeed

 

[Shakie]

Probier mal VBA.Right$

 

[vbspeed]

@Shakie

Wow jetzt funktioniert es. Danke !

Da ich von natur aus nugierig bin will ich jetzt wissen:
Warum das nicht funktioniert hat, und das im ganzen Code.

Nochmal Danke an alle die mir
bei diesem Problem geholfen haben.

Mfg. VbSpeed

 

[Shakie]

Tja, ich weiß auch nicht, warum es nicht funktioniert hat. Ich bin da nur drauf gekommen, weil VB bei mir schon beim Kompilieren meckert, wenn ich versuche Left$ ohne vorangestelltes VBA zu verwenden (wohlgemerkt Left$, bei dir war der Fehler ja bei Right[$]...)