动态添加列标题到列表视图答案

【问题标题】：Adding column headers to listview dynamically动态添加列标题到列表视图
【发布时间】：2015-02-26 15:44:14
【问题描述】：

我有一个列表视图，我想动态添加列标题。

    For i = 1 To MaxMatches
        Tempstring = "Match " & i.ToString
        ScheduleListView1.Columns.Add(New ColumnHeader() Tempstring)
    Next

悬停提示似乎表明我可以做到这一点（我会发布它的图片，但我的声誉还没有）。

但它不喜欢这种语法。

提前感谢您的帮助

【问题讨论】：

标签： vb.net dynamic columnheader

【解决方案1】：

这可能会更好：

ScheduleListView1.Columns.Add(Tempstring)

【讨论】：

从你的回答中我看到它是 vb.net，所以我更新了我的，让我知道。

【解决方案2】：

我似乎通过在 for 循环中调用子函数找到了解决方法：

Sub AddaColumn(ByRef ColumnString As String)
    Dim NewCH As New ColumnHeader

    NewCH.Text = ColumnString
    ScheduleListView1.Columns.Add(NewCH)
End Sub

我怀疑可能有更好的解决方案，我希望那些聪明的人会发布一个。

【讨论】：

【解决方案3】：

您可以通过设置更多属性来创建通用列添加功能

    public function Add_column(byval ListX as listview, byval ColString as string)
        Dim NewCH as new ColumnHeader

        NewCH.text = ColString
        listx.columns.add(NewCH)

    End Function

【讨论】：

您也可以通过添加自动设置宽度属性.. NewCH.width = len(ColString) + 5