2010-10-28 2 views
0

Привет, у меня есть следующий код, который добавляет текстовый базовый файл, известный как .pgp-файл; все работает отлично, за исключением того, что каждый раз, когда я запускаю это приложение, добавляю текст в одну непрерывную строку. Мне нужен текст для привязки к новой строке eveytime, которую он использует.Добавление к новой строке

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click 

    Dim FILE_NAME As String = "C:\test.pgp" 

    If System.IO.File.Exists(FILE_NAME) = True Then 
     Dim objWriter As New System.IO.StreamWriter(FILE_NAME, True) 
     objWriter.Write("saywhat " + (TextBox1.Text) + " case idont know what that means" + (TextBox2.Text)) 
     objWriter.Close() 
     MsgBox("CUSTOM.pgp file successfully appended") 
    Else 
     MsgBox("File Does Not Exist") 
    End If 


End Sub 

во-вторых, в следующей строке, если я добавить ошибочном юдоль, а затем верно он должен (по http://www.homeandlearn.co.uk/net/nets8p5.html) создать файл, если он существует dosnt, Popy КРАН, может кто-нибудь объяснить, что им делать неправильно здесь?

Dim objWriter As New System.IO.StreamWriter(FILE_NAME, True) 
+0

это VBA или VB.NET ??? –

+0

VBA Express босс ненавидит меня, используя прогромные языки за пределами Autolisp, но я не мог заботиться об этом –

+0

Нет такой вещи *, как VBA Express. Пожалуйста, отметьте вопросы правильно. – Fionnuala

ответ

0

если VB.NET вы можете использовать

objWriter.WriteLine() 

If VBA Вставить строку в файл .. либо до, либо после того, как содержание ...

objWriter.Write("" & Chr(10) & Chr(13)) 

В окнах шаблон \ r \ n в строке делает линейную развязку ... для другой операционной системы.

+0

Письмо работает славное спасибо. –

+0

pardon me im crashcausing VBA сегодня так \ r \ n на самом деле пробел? –

+0

\ r \ n является ключом ввода ... –

Смежные вопросы