CHARPOS/de

Funktion

Gibt die Position eines einzelnen Zeichens in einer Zeichenkette zurück.

 

 

Syntax

pos = CHARPOS(string , search [,start [,SAFE]])

 

 

Anmerkungen

pos	Numerische Variable in die die Position der Such-Zeichenkette gespeichert wird.
string	Zeichenkette, in der gesucht wird.
search	Such-Zeichenkette. Kann auch eine numerische Variable sein. Zum Beispiel ein Byte. Wenn eine ZeichenKETTE benutzt wird dann wird nur nach dem ersten Zeichen der Zeichenkette gesucht.
start	Optionale Startposition ab der die Suche beginnen soll.
SAFE	Wenn start angegeben wurde dann prüft die CHARPOS-Funktion mit SAFE, ob start außerhalb der Zeichenkette ist. Ist zum Beispiel die Zeichenkette "abc" und start 10 dann wäre start außerhalb der Zeichenkette. SAFE ist Standardwert. Wenn SPEED angegeben wird dann benutzt der Compiler den Wert für start ohne Prüfung. Es ergibt sich ein kürzerer und schnellerer Programmcode.

 

Konstanten können für string nicht benutzt werden. Nur Zeichenketten-VARIABLE.

Die Suche unterscheidet Groß- und Kleinschreibung.

 

 

Siehe auch

SPLIT , INSTR , REPLACECHARS , DELCHAR , INSERTCHAR , DELCHARS

 

 

Beispiel

'-------------------------------------------------------------------------------
' charpos.bas
' (c) 1995-2009 MCS Electronics
$regfile = "m88def.dat"
$crystal = 8000000
$baud = 19200
'-------------------------------------------------------------------------------
Dim S As String * 20
Dim Bpos As Byte
Dim Z As String * 1
 
Z = "*"
Do
Input "S:" , S
 Bpos = Charpos(s , Z)
Print Bpos
Loop Until S = ""
 
 
Do
Input "S:" , S
 Bpos = Charpos(s , "A") ' Beachte: CHARPOS unterscheidet Groß- und Kleinschreibung
Print Bpos
Loop

Languages	English • Deutsch