delphi导出excel，单元格咋填入多行数据

Question

导出到excel用的是剪切板方法，知道在excel中单元格内换行用alt_enter,键值是10，咋写成 s：＝ '姓名:'+strName+chr(10)+'性别：'＋strSex＋chr（10）……
导出后，还是把姓名、性别填在上下2个单元格中，预计的效果是一个单元格中显示2行哪位指点一下

Answer 1

先导入数据再换行不行吗?    With Selection
        .HorizontalAlignment = xlGeneral
        .VerticalAlignment = xlCenter
        .WrapText = True
        .Orientation = 0
        .AddIndent = False
        .IndentLevel = 0
        .ShrinkToFit = False
        .ReadingOrder = xlContext
        .MergeCells = False
    End With
End Sub

Answer 2

晕了在basic中写成这样就可以，看excel宏中录制后也是写成chr(10)