dibax10
Messages postés65Date d'inscriptiondimanche 25 avril 2010StatutMembreDernière intervention28 mars 2013
-
18 mai 2010 à 03:00
cs_lim
Messages postés329Date d'inscriptionjeudi 20 novembre 2003StatutMembreDernière intervention10 mai 2014
-
18 mai 2010 à 08:14
salut
j'ai un petit problème j ai crèer un fichier ou j ajoute un professeur mais a chaque fois que j ajoute un autre il est stocker dans la meme ligne quelqu un peu maider pour que j arrive a le stocker dnas la 2ème ligne
voila mon code
Sub Main()
Dim x As Integer
Dim prof As New professeur
Dim rep As String
Dim ligne As String = 1
Dim sw As StreamWriter = Nothing
Do
Console.WriteLine("enter votre choix")
x = Console.ReadLine
Select Case x
Case 1
sw = New StreamWriter("professeur.txt", True)
Console.Write("entrer code ")
prof._code = Console.ReadLine
sw.Write(prof._code)
sw.Write("//")
Console.Write("entrer nom ")
prof._nom = Console.ReadLine
sw.Write(prof._nom)
sw.Write("//")
Console.Write("entrer prenom ")
prof._prenom = Console.ReadLine
sw.Write(prof._prenom)
sw.Flush()
sw.Close()
End Select
Console.WriteLine("voullez vous continuer?o/n")
rep = Console.ReadLine
Loop Until rep = "n"
Console.Read()