vb.net 教程 3-4 窗体编程 公共控件9 ListView 4

版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的。
继续上一节讲解ListView的用法。

上一节谈到了如何编程一个类似于资源管理器显示“详细信息”时的窗口,代码中用了两个列标题“操作名称”和“操作说明”。

那么代码中ListViewItem的Text属性对应的是第一个列标题,

第一个ListViewSubItem的Text对应第二个列标题,

那么更多ListViewSubItem呢?看以下代码:

    '添加项目
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        '操作名称
        Dim OptionName As String = TextBox1.Text
        '操作说明
        Dim OptionInfo As String = TextBox2.Text
        '显示的图标
        Dim OptionIcon As Integer = Integer.Parse(ComboBox2.Text)

        '实例化一个ListViewItem
        Dim lvItem As New ListViewItem(OptionName, OptionIcon)
        '实例化一个ListViewSubItem
        Dim lvSubItem As New ListViewItem.ListViewSubItem()
        lvSubItem.Text = OptionInfo
        '将ListViewSubItem添加到ListViewItem
        lvItem.SubItems.Add(lvSubItem)

        '实例化一个ListViewSubItem
        Dim lvSubItem2 As New ListViewItem.ListViewSubItem()
        lvSubItem2.Text = "图标id" & OptionIcon.ToString
        '将ListViewSubItem添加到ListViewItem
        lvItem.SubItems.Add(lvSubItem2)

        '将ListViewItem加入到ListView中
        ListView1.Items.Add(lvItem)
    End Sub

我们将向一个ListViewItem增加2个ListViewSubItem,那么运行的时候显示如下:

vb.net 教程 3-4 窗体编程 公共控件9 ListView 4_第1张图片

可以看到,并没有显示第二个ListViewSubItem的内容。那么,如何才能显示呢?那就是添加列标题。

vb.net 教程 3-4 窗体编程 公共控件9 ListView 4_第2张图片

这样就可以正确显示了:

vb.net 教程 3-4 窗体编程 公共控件9 ListView 4_第3张图片

通过代码添加列标题:

    '添加列标题
    Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
        ListView1.Columns.Add("使用的图片")
    End Sub

还可以增加时指定列标题的宽度:

vb.net 教程 3-4 窗体编程 公共控件9 ListView 4_第4张图片

或者指定宽度并制定对齐方式:

按下“添加列标题”后,就可以看到第二个ListViewSubItem会立即显示出来:

vb.net 教程 3-4 窗体编程 公共控件9 ListView 4_第5张图片

 

 

你可能感兴趣的:(vb.net,教程)