Discussion :

[bananekiller]

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

[Kropernic]

Bizarre... J'ai copié ton code et ça compile bien chez moi... (j'ai remplacé les différents appels à des propriétés de contrôles par des valeurs correspondantes au type attendu.)

Vérifie bien... Recompile la solution...