| Вопрос: Сохранить в файл | Добавлено: 14.04.07 23:54 |
Автор вопроса:  Alias
|
|
В Delphi есть такое
var y:string; begin y:(Edit1.Text); Case checkBox1.State of cbchecked:Memo1.Lines.SaveToFile(y); end; Как можно это в VB.Net осуществить? |
| Ответы | Всего ответов: 2 |
|
Номер ответа: 1 Автор ответа:  BUMM ® Вопросов: 8 Ответов: 482 |
Профиль | | #1 | Добавлено: 15.04.07 01:01 |
|
y
 Edit1.Text);
это наверно какая-то оччень новая версия делфию раньше так писали: procedure TForm1.Button1Click(Sender: TObject); var y:string; begin y:=Edit1.Text; Case checkBox1.State of cbchecked: Memo1.Lines.SaveToFile(y); end; end; а по делу: Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If (TextBox1.Text = "" Or TextBox1.Text = "insert filename"  Then
TextBox1.Text = "insert filename" Exit Sub End If If Me.CheckBox1.Checked Then WriteToFile(TextBox1.Text, TextBox2.Lines) End Sub Private Sub WriteToFile(ByVal path As String, ByVal text() As String) Dim s As String Dim sw As New IO.StreamWriter(path) For Each s In text sw.WriteLine(s) Next sw.Close() End Sub |
||
|
Номер ответа: 2 Автор ответа: Sergey Вопросов: 2 Ответов: 10 |
Web-сайт: Профиль | | #2 | Добавлено: 29.04.07 19:45 |
|
а так еще легкче (в VS 2005):
System.IO.File.WriteAllText("путь","текст для записи","кодировка"
|
||
Страница: 1 |