IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VB.NET Discussion :

ProgressBar - Action du boutton1 [Débutant]


Sujet :

VB.NET

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Homme Profil pro
    Collégien
    Inscrit en
    Septembre 2011
    Messages
    113
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Collégien

    Informations forums :
    Inscription : Septembre 2011
    Messages : 113
    Par défaut ProgressBar - Action du boutton1
    Bonjour,
    Ayant fait un "Button1", il permet de supprimer certains fichiers du tool, cependant, je voulais compléter ce petit tool en posant une "ProgressBar"
    Mais impossible de trouver comment faire pour que le chargement de la "ProgressBar" corresponde à la vitesse de suppression des fichiers !
    Merci pour toutes vos futurs réponses
    Cordialement,
    T4unt

    PS: Ceci ce passe sous une application "Windows Form"

  2. #2
    Membre expérimenté
    Avatar de Sadar
    Homme Profil pro
    Développeur .NET
    Inscrit en
    Janvier 2005
    Messages
    49
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 58
    Localisation : Belgique

    Informations professionnelles :
    Activité : Développeur .NET
    Secteur : Biens de consommation

    Informations forums :
    Inscription : Janvier 2005
    Messages : 49
    Par défaut
    Peut-on avoir un exemple? car c'est difficile de répondre

    Merci

  3. #3
    Membre confirmé
    Homme Profil pro
    Collégien
    Inscrit en
    Septembre 2011
    Messages
    113
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Collégien

    Informations forums :
    Inscription : Septembre 2011
    Messages : 113
    Par défaut
    Voilà un exemple

    Kill("C:\Program Files (x86)\test\*.exe")
    (Va donc supprimer tous les .exe du dossier)
    Et je voudrais que la progressbar avance en fonction de la suppression du/des .exe
    (si 7% des .exe ont était supprimer la progressbar est à 7%)

    Voilà j’espère avoir était clair :X

  4. #4
    Membre expérimenté
    Avatar de Sadar
    Homme Profil pro
    Développeur .NET
    Inscrit en
    Janvier 2005
    Messages
    49
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 58
    Localisation : Belgique

    Informations professionnelles :
    Activité : Développeur .NET
    Secteur : Biens de consommation

    Informations forums :
    Inscription : Janvier 2005
    Messages : 49
    Par défaut
    Il faut insérer le référencement

    ensuite, voila comment j'aurai réalisé l'application :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
            Dim _compteur As Integer = 0
            Dim _nbreTrouver As Integer = 0
            Dim di As System.IO.DirectoryInfo = New System.IO.DirectoryInfo("C:\Program Files (x86)\test\")
     
            ProgressBar1.Minimum = 1
            ProgressBar1.Maximum = di.GetFiles.Length
            ProgressBar1.Value = 1
     
            _compteur = 0
            _nbreTrouver = 0
     
            For Each fi As System.IO.FileInfo In di.GetFiles
                _compteur += 1
     
                If fi.Extension = ".exe" Then
                    _nbreTrouver += 1
                    Kill("C:\Program Files (x86)\test\*.exe")
                End If
                ProgressBar1.Value = _compteur
     
            Next
     
            MsgBox(_nbreTrouver.ToString)
     
        End Sub

  5. #5
    Membre confirmé
    Homme Profil pro
    Collégien
    Inscrit en
    Septembre 2011
    Messages
    113
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Collégien

    Informations forums :
    Inscription : Septembre 2011
    Messages : 113
    Par défaut
    Merci de ta réponse, elle est bonne malgré que je ne comprend que très brièvement le code, enfin merci tout de même de t'être donner du mal pour satisfaire mon petit égaux personnel

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [Débutant] ProgressBar pendant une action
    Par blackhox dans le forum C#
    Réponses: 1
    Dernier message: 04/10/2013, 08h43
  2. ProgressBar sur action
    Par will2taz dans le forum VB.NET
    Réponses: 2
    Dernier message: 03/12/2007, 10h26
  3. action APRES chargement complet ...
    Par PinGuy dans le forum Delphi
    Réponses: 7
    Dernier message: 06/07/2006, 17h16
  4. ProgressBar avec plusieurs procédures
    Par elifqaoui dans le forum VB 6 et antérieur
    Réponses: 8
    Dernier message: 08/09/2002, 18h03
  5. Couleur de ProgressBar
    Par benj63 dans le forum C++Builder
    Réponses: 7
    Dernier message: 04/07/2002, 17h33

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo