Type et variables, long en string MERCI à vous

Bonjour à tous j'ai un gors problème pour faire une ligne de code pas très simple à visualisé.

Code:

---

ItemsDef(IndItem) = DeviceAddress & ("%MW" & Str(MotDepart) + ":20 ")

---

où ItemsDef(IndItem) est un string
où MotDepart est un long(mais je peux changer si cela est plus arrangeant à programmer)
où DeviceAddress est un string

En faite je veux lire dans un serveur opc les mots que je souhaite, dessous je recherche les mots 100..101...jusquà 119 et j'aimerais bien arriver à remplacer grâce à vous 100 et 20 par des variables.

Code:

---

ItemsDef(IndItem) = DeviceAddress & "!%MW100:20 "

---

Donc en résumé je cherche à convertir le long en string mais comme j'ai plusieurs je m'y perds facilement.

Merci d'avance

bonjour,

Code:

---

1 2 3 4 5 6 7

Dim lngValeur1 As Long Dim lngValeur2 As Long '... lngValeur1 = 100 lngValeur2 = 20 '... ItemsDef(IndItem) = DeviceAddress & "!%MW" & CStr(lngValeur1) & ":" & CStr(lngValeur2)

---

ensuite il faut faire une boucle pour ta variable de 100 à 119

Code:

---

1 2 3

For lngValeur1 = 100 To 119 '... Next

---

cdlt,

Merci petitdoudou pour ta réponse mais le problème n'est pas résolu en effet je me suis surement mal expliqué mais 100 et 20 je ne vois les voir directement c'est à l'utilisateur de marqué à quel mot il veut commencer(ici 100 par exemple) et combien de mots veut-il lire (20 par exemple)

Avec ce que tu m'as dit j'ai essayé cela sans succès :

Code:

---

ItemsDef(IndItem) = DeviceAddress & "!%MW" & CStr(MotDepart) & ":" & CStr(NombreMot)

---

Mais j'ai toujours mon erreur 1040 qui survient car la syntaxe de cette n'est pas correcte.

Merci encore

re...
peux-tu nous montrer la partie du code concernant la déclaration de tes variables (ItemsDef, DeviceAddress, MotDepart, ...)?

Oui pas de soucis.

Code:

---

1 2 3 4 5

Dim ItemsDef(NBR_ITEMS) As String Dim DeviceAddress As String Dim IndItem As Long Dim MotDepart As Long Dim NombreMot As Long

---

Merci

j'ai fait un test de mon coté sans problème. je remplis mon tableau avec "toto!%MW100:20", "toto!%MW101:20", "toto!%MW102:20", ...

• ton erreur survient lors de la compilation (CTRL+F5) ou lors de l'exécution?
• que vaut NBR_ITEMS?
• dans ItemsDef(IndItem), IndItem est-il supérieur ou inférieur à NBR_ITEMS?
• quel est le message d'erreur exact? (car il me semble que le numéro d'erreur 1040 corresponde à une erreur gérée par l'utilisateur)

C'est bon meric littledoudou, problème résolu :

Code:

---

ItemsDef(IndItem) = DeviceAddress & "!%MW" & MotDepart.Text & ":" & NombreMot.Text

---

A bientôt