EndOfLine Adding extra blank line

// Variable Declarations
'Var sLineEndNo As String = txtDetails.Text'.ReplaceLineEndings( "" )

// The code... the code that should work!
If( txtDetails.Text = "" )Then
  txtDetails.Text = Me.Text
Else
  txtDetails.Text = txtDetails.Text + Me.Text + EndOfLine
End If

Me.Text = ""

The code and a screen shot of the issue. The first 2 lines are as wanted, then the following lines have a blank space that I dont want.