Fermer in InputBox qui est dans un FOR,NEXT sans devoir fermer tout le formulair [Résolu]

Messages postés
23
Date d'inscription
jeudi 7 octobre 2010
Dernière intervention
20 juillet 2012
- 18 oct. 2010 à 01:12 - Dernière réponse :
Messages postés
23
Date d'inscription
jeudi 7 octobre 2010
Dernière intervention
20 juillet 2012
- 18 oct. 2010 à 01:50
Et bien voilà.

Pour mon travail d'école je dois utiliser la fonction InputBox pour recevoir des valeurs donnés par l'usager. Juste un petit
exemple TRÈS vite fait pour vous expliquer mon problème et comment j'aimerais le résoudre!


Dim exemple as string


For i as integer = 1 to 10

string = CStr(InputBox("Exemple"))


Next


Bon comme vous avez remarqués dans le for jai mon InputBox qui sera un "pop-up" tant que le for n'aura pas looper 10 fois.
Peu importe si l'usager clic sur le petit "X" du coin droit ou si il click sur le boutton "Annuler" le InputBox continuera
de suivre la valeur du FOR,NEXT.

Je ne vois pas trop comment faire pour que si l'usager clic sur le "X" ou sur "Annuler" le InputBox, celui-ci se fermera.

Pour le moment j'utilise une petite vérification..Je dit a l'usager d'écrire fermer dans la case du texte pour que le
programme se termine, mais le formulaire entier se ferme. L'exemple si dessous.

P.S : notes est la variable qui tient mon inputBox.

 If notes "fermer" Or notes "Fermer" Then

 Me.Close()

End If


Est-ce possible de seulement fermer le InputBox? Je ne vois pas trop comment..Dans ma tête je me dit qu'il fodrais sortir du loop mais je ne sais pas trop quoi faire pour que ca marche.


Merci pour votre aide
Afficher la suite 

Votre réponse

3 réponses

Meilleure réponse
Messages postés
540
Date d'inscription
mardi 4 août 2009
Dernière intervention
1 février 2013
- 18 oct. 2010 à 01:47
3
Merci
Mets un :
Exit For

au lieu de:
Me.Close()

Ce qui compte,ce n'est pas ce qu'on a mais plutôt ce que l'on fait avec ce qu'on a...

Visual Basic .Net is the best
and vb6.0

Merci NSUADI 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 90 internautes ce mois-ci

Commenter la réponse de NSUADI
Messages postés
23
Date d'inscription
jeudi 7 octobre 2010
Dernière intervention
20 juillet 2012
- 18 oct. 2010 à 01:17
0
Merci
Pour les personne qui aimerais voir mon code.

Note: Le code est loin d`être terminé. Je fait seulement ma gestion d'erreur pour cette partie.


Public Class Form1

    Dim globalNoteArray(9) As Integer

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim compteur As Integer
        Dim notes As String
        Dim tryNb As Integer
        Dim duTexte As Integer

        duTexte = False

        Try


            For compteur = 1 To globalNoteArray.Length() - 1


                notes = CStr(InputBox("Entrer votre note numéro" & " " & compteur & vbCrLf & vbCrLf & "Écrire *Fermer* dans la case ci-dessous pour terminer le programme"))

                If notes "fermer" Or notes "Fermer" Then

                    Me.Close()

                End If


                If Integer.TryParse(notes, tryNb) Then

                    If notes > 0 Then

                        globalNoteArray(compteur - 1) = notes

                        Me.Controls("Label" & compteur.ToString).Text = globalNoteArray(compteur - 1)

                        duTexte = False

                    Else

                        MessageBox.Show("Les notes négative ne sont pas accepter. Veuillez entrer une note positive!")

                        compteur = compteur - 1

                    End If

                Else

                    duTexte = True

                    MessageBox.Show("Les lettres ne sont pas acceptés dans cette case. Veuillez entrer des chiffres!")

                    compteur = compteur - 1

                End If

            Next


        Catch ex As Exception

            MessageBox.Show(ex.Message)

        End Try

    End Sub
End Class
Commenter la réponse de CDEProgrammeur
Messages postés
23
Date d'inscription
jeudi 7 octobre 2010
Dernière intervention
20 juillet 2012
- 18 oct. 2010 à 01:50
0
Merci
oh wow..tout un paragraphe juste pour une petite fonction :P

Merci beaucoup!
Commenter la réponse de CDEProgrammeur

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.