将SQL数据导出到Excel时如何设置列宽

如何解决将SQL数据导出到Excel时如何设置列宽

我正在使用vb.net将数据从sql导出到Visual Studio中的Excel电子表格。

导出工作正常，但是即使我创建了具有特定长度的字段，每列的列宽也默认设置为8.09（请参见下面的代码）。

在导出过程中，如何以编程方式扩展它们？

ExcelConnection.open()

Dim sql_CreateSheet = "CREATE TABLE [table1]" _
                    & "  ([IdNum] varchar(20)" _
                    & ",[FName] varchar(50)" _
                    & ",[LName] varchar(50)" _
                    & "  )"

Dim cmd_CreateSheet As New OleDb.OleDbCommand(sql_CreateSheet,ExcelConnection) 
cmd_CreateSheet.ExecuteNonQuery()

Dim sql_Insert = "INSERT INTO [table1] (IDNum,FName,LName)" _
               & "FROM [QryPOCTest_Excel] " _
               & "IN '' [ODBC;Driver={ODBC Driver 17 for sql Server};Server=" & sqlserver & ";Database=IDData;Trusted_Connection=yes]"
                   
Dim cmd As New OleDb.OleDbCommand(sql_Insert,ExcelConnection)
cmd.ExecuteNonQuery()