probleme avec format

Question

bonjour j'ai un probleme

j'ai
dim num$
...
    num$ = format$(percent, "###") + "%"

et il me marque un message d'erreur 
pourkoi ????

daniel lopes

Neo.balastik · Answer

Salut ;O)

Sous vb 6, je n'ai aucune erreur.
Serais-tu sous Access ?  Si oui, quelle version ?

Guy

cs_calimero93 · Answer

je suis sous vb 6
 tiens regerde j'ai sa et il me dise : le declaration de type est pas valide avec le type donné :

Sub UPDATEPROGRESS(PB As PictureBox, ByVal percent)
    Dim num$
    PB.Cls
    PB.ScaleWidth = 100
    PB.DrawMode = 10
    num$ = format$(percent, "###") + "%"
    PB.CurrentX = 50 - PB.TextWidth(num$) / 2
    PB.CurrentY = (PB.ScaleHeight - PB.TextHeight(num$)) / 2
    PB.ForeColor = RGB(((percent * 2) + 55), 255 - ((percent * 2) + 55), ((percent * 2) + 55))
    PB.Print num$
    PB.Line (0, 0)-(percent, PB.ScaleHeight), RGB(percent * 2 + 55, 0, 255 - (percent * 2)), BF
    PB.Refresh
End Sub

daniel lopes

Neo.balastik · Answer

Comment appelles-tu ta procédure UPDATEPROGRESS ?

econs · Answer

Aucune erreur chez moi avec ce code.

Par contre, il ne me dessine rien. Ca c'est un autre problème que je vais approfondir. Mais pas d'erreur ... Ca ne vient pas de UPDATEPROGRESS.

Manu

econs · Answer

OK .. il fallait juste mettre PB.AutoRedraw à True.
Donc tout fonctionne bien chez moi. Je ne vois pas de problème.

J'appelle la fonction comme ceci :

UPDATEPROGRESS Form1.PictureBox1, 53

Comment t'y prends-tu ?

Manu

cs_calimero93 · Answer

UPDATEPROGRESS Picture1, Avancement

daniel lopes

Neo.balastik · Answer

Salon moi, c'est peut-être la variable Avancement qui poserait problème.  Son type sans doute ?

A voir...

Guy

cs_calimero93 · Answer

Dim Avancement As Integer

daniel lopes

Neo.balastik · Answer

Impossible de reproduire le problème.
Si tu veux tu peux m'envoyer ton projet sur tchao.net@skynet.be

Guy

Probleme avec format

9 réponses

Discussions similaires