更改与 .net 中的数据集关联的组合框中的列宽

Question

我有一个 ComboBox，其数据源是来自 SQL Server 数据库的数据集。

其列的宽度与列名称的宽度相关。我想增加宽度，以便正确查看内容而不是被剪切。

这是我正在谈论的内容的屏幕截图：

正如您所看到的，第二列中的值并未完全显示。

这是我用来加载组合框的方法：

Public Sub CargarComboAlternativo(ByVal Combo As ComboBox, ByVal query As String)
    Dim connectionString As String = "Data Source=" & Servidor & ";Database=" & Bdatos & ";Trusted_Connection=Yes;UID=" & UID & ";"
    Dim adapter As SqlDataAdapter
    Dim dataSet As DataSet = New DataSet()

    Try
        Using conn As SqlConnection = New SqlConnection(connectionString)
            Using command As New SqlCommand(query, conn)

                command.CommandType = CommandType.Text

                conn.Open()

                adapter = New SqlDataAdapter(command)
                dataSet.Clear()
                adapter.Fill(dataSet)

                Combo.DataSource = dataSet
            End Using
        End Using
    Catch ex As Exception
        MessageBox.Show(ex.Message)
    End Try
End Sub

有什么建议吗？

我完全不介意 C# 中的建议，将其转换为 vb.net 不会有问题

Answer 1

最后怎么样：

Dim total As Integer = 0
Dim maxLen As Integer = 0
For Each row As DataRow In ds.Tables(0).Rows
  total = 0
  For Each Str As String In row.ItemArray
    total = Str.Length + total
  Next
  If maxLen < total Then maxLen = total
Next

Combo.Width = maxLen + 5

我知道它的蛮力，但你会找到最长的项目并将宽度设置为该值。 +5 用于填充，您可能需要更改它。