OVH Cloud OVH Cloud

Message d'erreur en utilisant des fonctions

2 réponses
Avatar
Encore Marie
C'est encore moi.
Sous vb je veux utiliser des fonctions=20
comme "Right", "Str", "Mid" mais j'ai =E0 chaque fois un=20
message d'erreur : Erreur de compilation : projet ou=20
biblioth=E8que introuvable.
La fonction est s=E9lectionn=E9e.
je vous joins mon code (qui est tr=E8s simple) mais je ne=20
pense pas que =E7a vienne de l=E0 :=20
rivate Sub cmdbascule_Click()

Dim VarMontant, DernierCar
VarMontant =3D TxtMontant
DernierCar =3D Right(VarMontant, 1)
End Sub
Merci beaucoup pour votre aide.
Marie

2 réponses

Avatar
Jacquouille
Bonjour,
De: "Encore Marie"
Private Sub cmdbascule_Click()
Dim VarMontant, DernierCar
VarMontant = TxtMontant
DernierCar = Right(VarMontant, 1)
End Sub


Le compilateur ne peut connaitre la valeur de VarMontant
au moment de la compilation et ne détecte donc pas ce genre d'erreur.
Par contre, il a détecté que VarMontant=TxtMontant.
Je pense que TxtMontant n'est pas correct par exemple en
étant déclaré dans une autre procédure en variable dim alors
qu'il faudrait la déclarer en public.
Jacques
Avatar
gloops
Salut,

Tu n'aurais pas l'habitude de VB.Net, des fois ?

Je dirais que pour utiliser les fonctions left, right ... il faut
vérifier dans les références du projet la présence de VBA.

Dans certaines circonstances on pourra préférer préfixer chaque
fonction, L$ = VBA.Left$(a$) par exemple. Mais ça ça concerne plutôt Access.
________________________
Jacquouille a écrit :

Bonjour,

De: "Encore Marie"
Private Sub cmdbascule_Click()
Dim VarMontant, DernierCar
VarMontant = TxtMontant
DernierCar = Right(VarMontant, 1)
End Sub



Le compilateur ne peut connaitre la valeur de VarMontant
au moment de la compilation et ne détecte donc pas ce genre d'erreur.
Par contre, il a détecté que VarMontant=TxtMontant.
Je pense que TxtMontant n'est pas correct par exemple en
étant déclaré dans une autre procédure en variable dim alors
qu'il faudrait la déclarer en public.
Jacques