VB Changer le BackGroundImage en fonction d'une ProgressBar.

Bonjour,

Est ce possible de changer le fond d'écran de son logiciel en fonction d'une ProgressBar ?
Je m'explique lorsque la ProgressBar atteind une Valeur entre "33" et "65" Le BackGroundImage change par une image que l'on puisse importer de son ordinateur.

J'ai pensé a ce genre de code :

ProgressBar1.Value = "33,34,35..."(jusque 65 )
BackGroundImage = "url de l'image sur l'ordinateur"
ProgressBar1.Value = "66,67,68..." (jusque 99 )
BackGroundImage = "url de l'image sur l'ordinateur"
ProgressBar1.Value = "100"
BackGroundImage = "url de l'image sur l'ordinateur"

1 réponse

  • Votes
  • Date
  • Date décroissante
  1. C'est simple : Voici le code
    If ProgressBar1.Value = 33 Then
    Me.BackgroundImage = "C:\fichier"
    Elseif ProgressBar1.Value = 65 Then
    Me.BackgroundImage = "C:\fichier"
    Elseif ProgressBar1.Value = 100 Then
    Me.BackgroundImage = "C:\fichier"
    End If