Как отформатировать строку Break (VBCrLf)

Question

У меня есть следующий код и вы хотите сделать две вещи. Я хотел бы разделить два кода W.writeLine на одну или две строки. VbCrlf, похоже, не работает, я получаю ошибки. Я также хотел бы изменить цвет Total Due и TotalDueTextBox.Text на красный. Какие-либо предложения?

Private Sub SaveAsToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles SaveAsToolStripMenuItem.Click 
    sFile.InitialDirectory = ("C:\") 
    sFile.FileName = ("Save As...") 
    sFile.Filter = ("Only Text Files (*.txt)|*.txt") 
    sFile.ShowDialog() 

    Dim W As New IO.StreamWriter(sFile.FileName, True) ' notes from class need messgbox 
    Dim i As Integer 
    For i = 0 To PurchaseListBox.Items.Count - 1 
     W.WriteLine(PurchaseListBox.Items.Item(i)) 

    Next 

    Dim TotalDue As String = TotalDueTextBox.Text 
    W.WriteLine(vbTab & vbTab & vbTab & vbTab & vbTab & vbTab & vbTab & "TotalDue" & TotalDueTextBox.Text.PadLeft(14, "")) 
    W.Close() 
End Sub 

Answer 1

Вы можете просто позвонить WriteLine("") каждый раз, когда вы хотите напечатать пустую строку.