Discussion :

[theopom]

Bonjour,
Je suis embétant cela fait plusieur d'heure que je m'arrache les cheveu sur ce problème, j'aimerais que mon petit logiciel récupère ce qui y'a marquer dans une TextBox de ma Form2, et qui à l'aide d'un bouton sur ma Form1 lance le programme à l'aide du répertoire donné dans le TextBox sur la form2.

J'en suis actuellement à là

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Dim startInfo As ProcessStartInfo = New ProcessStartInfo(Form2.TextBox1.Text)
    End Sub

Mais je ne sais pas réellement comment incorporer le "

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Form2.TextBox1.Text

Après ce qui y'a marquer dans ma Form2 j'ai les sauvegarder à l'aide des Paramètre String, donc peut etre qu'on peut passer par la au lieu du TextBox ?

Merci

[ZenZiTone]

Il faudrait qu'a la fermeture de ton formulaire 2 tu inscrives la valeur du texte box dans une propriété publique du formulaire. De là, dans le formulaire 1 tu récupères la valeur de la propriété du formulaire 2 suite à sa fermeture.

[theopom]

D'accord mais je ne connais pas tellement ca et cela ne pourrais pas marcher avec les String car c'est valeur son enregistrée par des String crée.
Ou bien marcher comme je les fait mais différament

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
    Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
        If TextBox1.Text = "" Or TextBox2.Text = "" Then
            MsgBox("Veuillez remplir toutes les cases demander pour le bon fonctionnement de ce logiciel", MsgBoxStyle.Critical, ("Erreur"))
        Else
            My.Settings.SaveFiveM = TextBox1.Text
            My.Settings.SaveDiscord = TextBox2.Text
            My.Settings.Save()
            Close()
        End If
    End Sub

Solution : Je n'etait pas loin finalement

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim startInfo As ProcessStartInfo = New ProcessStartInfo(My.Settings.SaveFiveM)
        startInfo.Arguments = "+connect 000.000.00.00:00000"
        Process.Start(startInfo)
    End Sub