Bonjour, je vais pas passer par 5000 chemin et vous exposer mon probleme! (je remercie d'avance si quelqun veux bien m'aider )


J'ai une erreur de terminaison et sa me dit sa:
End of statement expected

Apres il me dit ligne 95 (ligne 15 sur la boite de code) alors voici les lignes:

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
   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If CheckBox1.Checked = True Then
            If System.IO.File.Exists(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\.minecraft\loglogin.txt") = True Then
                Kill(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\.minecraft\loglogin.txt")
            End If
            Dim sw As New System.IO.StreamWriter(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\.minecraft\loglogin.txt")
            sw.WriteLine(TextBox1.Text)
            sw.WriteLine(TextBox2.Text)
            sw.Close()
            Process.Start(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\.minecraft\bin\minecraft.exe", TextBox1.Text & " " & TextBox2.Text & " kerta.dedicraft.fr:25886")
        Else
            If System.IO.File.Exists(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\.minecraft\loglogin.txt") = True Then
                Kill(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\.minecraft\loglogin.txt")
            End If
            Process.Start(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\.minecraft\bin\minecraft.exe", TextBox1.Text & " " & TextBox2.Text & " kerta.dedicraft.fr:25886")
        End If
    End Sub
merci pour votre aide