VB.Net/File Directory/Stream Writer

Материал из VB Эксперт
Версия от 15:45, 26 мая 2010; Admin (обсуждение | вклад) (1 версия)
(разн.) ← Предыдущая | Текущая версия (разн.) | Следующая → (разн.)
Перейти к: навигация, поиск

StreamWriter WriteLine

<source lang="vbnet"> Imports System Imports System.Data Imports System.IO public class MainClass

  Shared Sub Main()
      Dim FileToRead As String = CurDir + "test.txt"
      Dim TestFile As FileStream
      Try
          TestFile = New FileStream(FileToRead, FileMode.Create, FileAccess.ReadWrite)
          Dim Writer As New StreamWriter(TestFile)
          Writer.WriteLine("8")
          Writer.WriteLine("7")
          Writer.WriteLine("0")
          Writer.WriteLine("ABC")
          Writer.WriteLine("5")
          Writer.Flush()
          TestFile.Seek(0, SeekOrigin.Begin)
      Catch CantCreate As Exception
          Console.WriteLine("Can"t create or write the file")
          Exit Sub
      End Try
  End Sub

End Class


      </source>