Discussion :

[titidu44]

Bonjour,
J'ai quelques problèmes sur un auto correcteur de texte, et je poste ce message ici car je pense que vous pourriez m'aider

Bref voici mes plans:
- Je souhaite que mon programme puisse insérer, éditer un texte dans un fichier .txt si le contenu est vide ou incorrect au model.
- Je souhaite que le fichier se créer automatiquement si li n'est pas créer et dans la bonne arborescence.

Voici mon project:

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
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
 
Imports System.IO
 
Public Class Form1
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
 
 
        Dim FILE_NAME As String = "C:\Users\***\Desktop\lol.txt"
        Dim i As Integer
        Dim aryText(4) As String
 
        aryText(0) = "test"
        aryText(1) = "test2"
        aryText(2) = "test3"
        aryText(3) = "test4"
        aryText(4) = "test5"
 
        Dim objWriter As New System.IO.StreamWriter(FILE_NAME, True)
 
        For i = 0 To 4
 
            objWriter.WriteLine(aryText(i))
 
        Next
 
        objWriter.Close()
 
        MsgBox("Texte ajouté et/ou corrigé")
 
        If Not Text.Contains("test") Then
            MsgBox("d")
        End If
 
 
    End Sub
End Class

Merci d'avance

[sisqo60]

Bonsoir,

Je pense que tu devrais reprendre ton post et essayer de réellement faire quelquechose. Parce que là, entre ce que tu souhaites faire et le code que tu as pondu, il y a des années-lumière...

Si tu cherches à trouver quelqu'un pour te faire ton boulot, c'est raté, c'est un forum d'entraide...

Bon courage