Private Sub btnvbCrLf_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnvbCrLf.Click
Dim a As String
a = "aaa"
MsgBox(a.Length)
a = a & vbCrLf
MsgBox(a.Length)
a = a & "aaa"
MsgBox(a.Length)
MsgBox(Len(vbCrLf))
End Sub
Dim a As String
a = "aaa"
MsgBox(a.Length)
a = a & vbCrLf
MsgBox(a.Length)
a = a & "aaa"
MsgBox(a.Length)
MsgBox(Len(vbCrLf))
End Sub