Text von einem string abschneiden, wie ?

[green]

Ich hab mich gefragt wie (wenn überhaupt) man text von einem string abschneiden kann, anfügen geht ja mit "text" & "text2"
ich hab die MSDN schon stundenlang erfolglos durchsucht......:mauer:
hilfe.....

[fabian ackle]

mit mid(string,1,5)
string ist der originalstring, danach gibst du an wo er beginnen soll (im beispiel bei 1) und danach gibst du noch an wie lange es sein soll (im beispiel sind es 5 zeichen)


string = "abcdefgh"
text1.text = mid(string, 1, 5)

so würde in der textbox dann "abcde" stehen

greetz

fabian

[Chaq]

Zum Zerlegen von String gibt es in VB die Funktionen Left, Right und Mid.

Beispiele:

Left("Alle Pizzen fliegen hoch",4)
' die ersten 4 Buchstaben (="Alle")
Right("Geht doch gar nicht!",6)
' die letzen 6 Buchstaben (="nicht!")
Mid("Geht ja wohl!",5,2)
' 2 Buchstaben ab Position 5 (="ja")
Mid("Geht ja wohl!",5)
' alle Buchstaben ab Position 5 (="ja wohl"!)


Ich hoffe, dass dir damit geholfen ist.

Gruß

Chaq

[green]

danke, hätte ohne eure hilfe echt nicht weitergewusst.....
cya green

[green]

bins mal wieder (vermutlich kennens eh schon alle ausser mir), aber falls das jemandem hilft, hab ne möglichkeit gefunden wie man bei dateinamen die als string vorliegen die endungen abzutrennen.

dim zaehler as single
dim dateiname as string

dateiname = 'quelle von dateiname'
zaehler = len(dateiname)
zaehler = zaehler - 4
dateiname = left(dateiname,zaehler)


wollts nur mal gepostet haben falls es noch ein paar andere newbies wie mich gibt die das problem haben/hatten
cu green

[Maik]

@green

Ich hab zwar keinen Plan von VB aber das bisschen Code von dir glaube ich zu verstehen.
Wenn ich das richtig sehe, schneidest du einfach von den kompletten Dateinamen die letzten vier Zeichen ab und erhälst dadurch den Dateinamen ohne Erweiterung (z.B. ".exe")
Ist ja alles schon und gut, aber was passiert wenn du Dateien hast die nicht deinem Muster folgen, wie zum Beispiel ".html", oder Dateinamen ohne Erweiterung.
Dann hast du ein Problem würde ich sagen.

ich hab zwar keine Ahnung wie das in VB funzt, aber ich würde in der Zeichenkette nach dem letzten auftreten des Zeichens "." suchen und dann alles einschließlich des letzten Punkts abschneiden.
Gibts in VB sowas wie reguläre Ausdrücker oder so?


Xothous

P.S. Bitte korrigiere mich wenn ich deinen Code falsch verstanden habe

[fabian ackle]

@Xothous: hast du richtig verstanden

mitpkt = instr(1,dateiname,".")
findest du die position des (ersten) punktes

parameter1 (1) -> anfangsposition
parameter2 (dateiname) -> string
parameter3 (".") -> das zu suchende zeichen

greetz

dubious

[Maik]

@fabian

ich muß doch aber den letzten punkt haben, weil man doch in dem eigentlichen dateinamen auch punkte verwenden darf. nimmst du den ersten, dann kannst du Pech haben und er trennt mitten im Dateinamen

Xothous