Transformez votre progressbar en une image!

Description

Ceci n'est pas à proprement parler une source, mais plutôt une astuce toute simple qui peut embellir vos pages de chargement, ou prenant en compte un long traitement. L'idée est basique: une image est progressivement dévoilée au fur et à mesure de la progression d'une tâche, comme dans le chargement dans les jeux... Eh oui c'est con mais fallait y penser...

Source / Exemple :


'pour les ptis faignants lol
'à mettre dans un module

Function Chargement(Pourcentage)
    If Pourcentage > 100 Then
    MsgBox "Pourcentage maximum atteint", vbInformation
    Exit Function
    End If
Form1.Image1.Width = Form1.Image1.Width * Pourcentage / 10
End Function

'Vous l'aurez compris, Pourcentage contient l'état d'avancement du chargement en %.
'Je pars du principe que l'image se nomme Image1 et qu'elle se situe sur la feuille Form1.

'Et pis pour l'appel de fonction:
Result = Chargement(12) 'mais vous l'aurez encore compris...

'les amateurs de rammstein seront ravis par l'image utilisée comme exemple, visible sur la capture... :)

Conclusion :


Voila... Comme on ne peut pas vraiment définir ça comme une source, je ne vous invite pas à noter. Bonne "vraie" prog lol

Vedlen

Codes Sources

A voir également