Discussion :

[snoopy69]

Bonjour,

Je travaille avec VB6 sur Windows XP Sp3.

Je suis face à un petit problème ... ... il me semble que ce que je cherche à faire n'est pas possible mais j'aurais besoin d'une confirmation de votre part ...

J'ai une variable de type texte déclarée comme suit :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Dim strTexte as string
strTexte = "?\r"

Ce que je cherche à faire c'est convertir le contenu de cette variable en type LONG ... ...

Je sais qu'il existe bien la fonction CLng que j'ai voulu utiliser comme suit :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Dim lngResultat as long
lngResultat = CLng(strTexte)

Voici l'erreur que j'ai lors de l'exécution du code :

Run-time error '13':
Type mismatch

Selon moi il est normal que j'aie une erreur car à la base les caractères "?\r" ne sont pas des chiffres (numéros) ... ...

Si je cherche à faire tout cela c'est parceque j'aimerais envoyer une commande à un périphériques USB. Les caractères "?\r" me permette de demander une valeur au périphérique ...

Est-ce que vous pourriez me donne un petit coup de main déjà pour que je sache si il est possible de convertir la chaine "?\r" en type LONG. Et si ce n'est pas le cas, est-ce que vous pouvez éventuellement m'orientez vers qqch ? ...

Merci d'avance de vos réponses. En cas de questions, je reste à votre disposition ...

Salutations à vous tous ...

[ucfoutu]

Bonjour,

Pour calculer une expression exprimée sous forme de texte, regarde du côté de Eval (Evaluate).
Une petite recherche sur ce forum te permettra de voir ce que c'est.


EDIT :
Si maintenant, ton caractère de séparation est toiujours le même, à savoir "\" (dont division entière), tu peux utiliszer :
- instr pour extraire la position du "\"
- left, pour extraire jusqu'à cette position -1
- mid, pour extraire à partir de cette position + 1
- appliquer la fonction val à chacune de ces deux extractions
- faire alors ta division sur ces deux valeurs.