string & vbCrLf
或string & chr(13) & chr(10)