none
remplacer une Combox par un bouton sans ouverture de l'openfiledialog RRS feed

  • Question

  • Bonjour, je voulais savoir  si on pouvais remplacer une Comboxbox par un  bouton  qui  ouvrirait  vers le  bon chemin du   fichier  automatiquement (Questionnaire01.txt) ,sans l'openfiledialog

    remplacer cela 

    Par cela

    cela est possible?

    Merci de votre compréhension.


    • Modifié Yannel777 vendredi 12 avril 2019 15:02
    vendredi 12 avril 2019 14:04

Toutes les réponses

  • Bonjour,

    oui c'est possible de changer automatique par un bouton sans openfiledialog.

    voici un exemple :

    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
            If ComboBox1.SelectedIndex = 0 Then
                Dim questionnaire1 As String = Application.StartupPath & "\Questionnaire1.txt"
                If File.Exists(questionnaire1) Then
                    '...lecture du fichier txt
                    'Application.StartupPath => chemin ton application exe
                End If
            ElseIf ComboBox1.SelectedIndex = 1 Then
                Dim questionnaire2 As String = Application.StartupPath & "\Questionnaire2.txt"
                If File.Exists(questionnaire2) Then
                    '...lecture du fichier txt
                    'Application.StartupPath => chemin ton application exe
                End If
            End If
        End Sub

    ou avec le bouton :

    Dim questionnaire1 As String = Application.StartupPath & "\Questionnaire1.txt"
                If File.Exists(questionnaire1) Then
                    '...lecture du fichier txt
                    'Application.StartupPath => chemin ton application exe
                End If
    Cordialement,



    dimanche 14 avril 2019 10:32