TextBox в VB 2005

[micron]

У меня такой вопрос, как из нескольких TextBox-сов записать в текстовый файл?Данные в TextBox-сах не текстовые,а цифровые.

[mrcnn]

Если массив текстбоков

Dim st As String
st=""
For i = 0 To aSz - 1
st = st & aTx(i).Text & " "
Next

В случае необходимости Cstr

а дальше супер стандартная запись
Dim fs As IO.FileStream, sr As IO.StreamReader
Dim FileName As String, sw As IO.StreamWriter
SaveFileDialog1.ShowDialog()
FileName = SaveFileDialog1.FileName
fs = IO.File.Open(FileName, IO.FileMode.OpenOrCreate)
sw = New IO.StreamWriter(fs)
sw.WriteLine(st)
sw.Close()
fs.Close()

В проект добавить нуно SaveFileDialog1

[Admiral]

Из соседней темы Visual Basic 2008 (http://forum.oszone.net/thread-105702.html) доступный другой способ
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
FileOpen(1, "File.log", OpenMode.Append) 'Открываем для добавления. Если файла нет, то он создаётся
PrintLine(1, TextBox1.Text) 'Добавляем строчки в лог файл
PrintLine(1, TextBox2.Text)
PrintLine(1, TextBox3.Text)
PrintLine(1, "") 'Добавляем пустую строчку
FileClose(1) 'Желательно после всех проделанных операций закрывать файл
End Sub »