在VB.net中如何让单元格中的文字换行

我尝试使用如下代码(VB.net)实现文字换行。
Dim w As Workbook = New Workbook(“TEST01.xlsx”)
Dim s As Worksheet = w.Worksheets(0)
s.Cells(“A1”).PutValue(“ABC” & vbCrLf & “DEF”)

但打开生成的文件后,A1单元格内的ABCDEF在同一行显示。双击A1单元格后,DEF换行显示。
我希望打开文件后ABCDEF直接以换行形式显示,该如何做呢?谢谢!

@ztc001,
请使用以下代码:

Dim a1 = s.Cells(“A1”)
a1.PutValue(“ABC” & vbCrLf & “DEF”)
Dim style = a1.GetStyle()
style.IsTextWrapped = True
a1.SetStyle(style)

@ztc001,

此外,请参阅包含示例代码的文档,以进一步参考 [在单元格中包装文本]。

@amjad.sahi @John.He
非常感谢二位的解答。

@ztc001,

不客气。 如果您有进一步的疑问或问题,请随时给我们回信。