Je cherche referenceil d'un fonction mid()

cs_khier Messages postés 19 Date d'inscription dimanche 23 mars 2003 Statut Membre Dernière intervention 31 mars 2009 - 28 sept. 2008 à 08:46
Kristof_Koder Messages postés 918 Date d'inscription vendredi 3 août 2007 Statut Membre Dernière intervention 27 octobre 2008 - 29 sept. 2008 à 17:08
salut ,
je suis debutant en vb6 ,j ai un probleme d' un code source:

 NO = Mid(STR, 2, Len(STR)),   'd'erreur uncune bibliotheque introuvable
la fonction MID ('d'erreur uncune bibliotheque introuvable)

aide moi svp

3 réponses

jmfmarques Messages postés 7666 Date d'inscription samedi 5 novembre 2005 Statut Membre Dernière intervention 22 août 2014 27
28 sept. 2008 à 11:37
Bonjour,

Si tu es bien sous VB (et pas autre chose...) :
Il n'y a pas de "référenciel de la fonction Mid" !... Elle est incluse dans une librairie de VB6.
Je note par contre que tu utilise le nom STR pour une chaîne de caractères.
Str est un mot réservé de VB6
Si tu t'es amusé à faire ici et là la même chose (utiliser des mots réservés VB6 pour nommer une variable, une procédire, une fonction, etc...) ===>> ne t'étonne pas que VB perde la boussole ...
0
PCPT Messages postés 13272 Date d'inscription lundi 13 décembre 2004 Statut Membre Dernière intervention 3 février 2018 47
29 sept. 2008 à 08:40
merci de ne pas reposter la même question alors que celle-ci est encore sur la page d'accueil !

doublon supprimé

MID attend la taille en OPTION, si tu veux toute la chaîne à partir du 2e caractère alors pas besoin de LEN
si MID n'est pas trouvé (pour une rare raison), tu peux le préfixer de son emplacement :

Dim NO As Long
NO = VBA.Strings.Mid("X123", 2)


<hr size="2" width="100%" />
Prenez un instant pour répondre à [sujet-SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp
0
Kristof_Koder Messages postés 918 Date d'inscription vendredi 3 août 2007 Statut Membre Dernière intervention 27 octobre 2008 10
29 sept. 2008 à 17:08
déjà eu ce souci avec un projet dont une référence manquait ! VB6 n'allait du coup même plus charger la bibliothèque VBA ... donc adieu les Mid, left, etc ...
pb résolu pour moi en réglant le pb de la référence manquante
0
Rejoignez-nous