pourquoi Val (oldP) obtient 1 quand oldP = "32"?

Question

j'ai une vieille chaîne dis oldString="abc-2" je veux changer à "abc-3" donc je l'ai fait

myArray = Split(oldString, "-") 
oldP = myArray(UBound(myArray)) 
myArray(UBound(myArray))= Str(val(oldP) + 1) 
newString=join(myArray,"-") 

pourquoi dois-je obtenir le mauvais numéro ?? et si j'essaie d'utiliser Cint(), alors j'ai eu Erreur.

s'il vous plaît aider ...

juste trouvé le vrai problème. J'ai changé mon mode de saisie par accident et j'ai mis un "2-byte" numéro 2 dans le même champ, où j'ai eu mon ancienne, d'un autre enregistrement. Et après cela, CInt reconnaît mon ancien type comme mauvais type. Il semble que ms-Access ait changé implicitement l'encodage de ce champ, de sorte que Cint ne sait pas quoi faire et que Val ait la mauvaise valeur. Ils doivent avoir rendu Textfield dans Access, String fonctionne indépendamment de tous les encodages, ou tous utilisent UTF-8. Au moins, il devrait m'avertir quand il change l'encodage de ce champ de texte. Peut-être que je devrais le signaler à MS?

Answer 1

Si votre fonction articulaire fonctionne bien, tout devrait bien se passer. Ce que vous pouvez essayer est:

Ouvrez VBA dans Access, puis ouvrez votre fenêtre Exécution (Affichage-> Fenêtre Immédiate) Ensuite, exécutez ces linese un par un et publiez vos résultats.

oldString="abc-2" 
myArray = Split(oldString, "-") 
oldP = myArray(UBound(myArray)) 
?oldP 

Cela devrait PROMT comme réponse? OldP

myArray(UBound(myArray))= Str(val(oldP) + 1) 
?myArray(1) 

Cela devrait inciter

newString=joint(myArray,"-") 
?newString 

Cela devrait inciter "abc-3"