I have a text box and use vbCrLF to insert a blank line. It does not work instead it iserts two this black lines a bit like ||. Here is the code, any ideas
While Not rsResults.EOF
txtResults = txtResults & vbCrLf & IIf(IsNull(rsResults("ID"
), "", rsResults("ID"
) _
& IIf(IsNull(rsResults("DocID"
), "", rsResults("DocID"
) _
& IIf(IsNull(rsResults("Description"
), "", rsResults("Description"
) _
& IIf(IsNull(rsResults("DiaryDate"
), "", rsResults("DiaryDate"
) _
& IIf(IsNull(rsResults("Status"
), "", rsResults("Status"
) _
& IIf(IsNull(rsResults("CloseDate"
), "", rsResults("CloseDate"
) _
& IIf(IsNull(rsResults("TS"
), "", rsResults("TS"
) & vbCrLf
rsResults.MoveNext
Wend
While Not rsResults.EOF
txtResults = txtResults & vbCrLf & IIf(IsNull(rsResults("ID"


& IIf(IsNull(rsResults("DocID"


& IIf(IsNull(rsResults("Description"


& IIf(IsNull(rsResults("DiaryDate"


& IIf(IsNull(rsResults("Status"


& IIf(IsNull(rsResults("CloseDate"


& IIf(IsNull(rsResults("TS"


rsResults.MoveNext
Wend