MID$
fonction : renvoyer un nombre de caractères depuis le milieu d'une chaîne
destination$=Mid$(source$,décalage,nombre)
Mid$(destination$,décalage,nombre)=source$
De manière similaire, la fonction MID$ renvoie des caractères depuis le milieu d'une chaîne, le premier nombre spécifié entre parenthèses indiquant le décalage à partir du début de la chaîne et le second nombre indiquant combien de caractères doivent être récupérés. Si le nombre de caractères à récupérer est omis de votre instruction, alors les caractères seront lus jusqu'à la fin de la chaîne examinée. Voici quelques exemples :
E> Print Mid$("AMOS Professional",6)
Print Mid$("AMOS Professional",6,4)
E> A$="AMOS Professional ***"
Mid$(A$,19)="Basic"
Print A$
Mid$(A$,19,3)="Mag"
Print A$
Recherche de caractères dans une chaîne
Il est souvent nécessaire de parcourir une masse de données à la recherche d'une référence particulière,
autrement dit, de rechercher dans des chaînes des caractères individuels ou des sous-chaînes. De même, vous pouvez
souhaiter écrire un jeu d'aventure où des lignes de texte doivent être décomposées en commandes individuelles.
INSTR
fonction : rechercher des occurrences d'une chaîne dans une autre chaîne
x=Instr(hôte$, invité$)
x=Instr(hôte$, invité$, position de départ de la recherche)
INSTR vous permet de rechercher toutes les occurrences d'une chaîne dans une autre. Dans les exemples suivants, les chaînes "hôtes" sont examinées pour la première occurrence des chaînes "invitées" que vous recherchez. Si la chaîne pertinente est trouvée, sa position sera indiquée sous la forme du nombre de caractères depuis le côté gauche de la chaîne hôte. Si la recherche échoue, un résultat de zéro sera renvoyé.
E> Print Instr("AMOS Professional","AMOS")
Print Instr("AMOS Professional","O")
Print Instr("AMOS Professional","o")
Print Instr("AMOS Professional","Provisional")
E> Do
Input "Tapez une chaîne hôte :";H$
Input "Tapez une chaîne invitée à trouver :";G$
X=Instr(H$,G$)
If X=0 Then Print G$;" introuvable"