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

上一节谈到个问题,当ListView的View的属性为Details时,ListView里面什么都没有显示
这是为什么呢?
其实Details时,有点类似于资源管理器里显示”详细信息“:

本节主要讨论如何设置列标题
首先设置ListView的View属性为Details,方便及时查看。
从Columns属性按下后面的按钮"...",此时出来 ”ColumnHeader 集合编辑器“窗口,按下”添加“,此时就添加上了一项,再修改Text属性为需要的文本:

可以看到编辑窗体上出现了 ”操作名称“这个列标题。为了方便说明,请继续添加一项”操作说明“。
在上一节窗体的基础上修改如下:

修改添加“按钮代码如下:
    '添加项目
    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)
        '将ListViewItem加入到ListView中
        ListView1.Items.Add(lvItem)
    End Sub

顺序是
ListViewSubItem 加入到 ListViewItem ,ListViewItem 加入到 ListView.Items
看看Details时的运行效果



学习更多vb.net知识,请参看 vb.net 教程 目录

相关文章

Format[$] ( expr [ , fmt ] ) format 返回变体型 format$ 强...
VB6或者ASP 格式化时间为 MM/dd/yyyy 格式,竟然没有好的办...
在项目中添加如下代码:新建窗口来显示异常信息。 Namespace...
转了这一篇文章,原来一直想用C#做k3的插件开发,vb没有C#用...
Sub 分列() ‘以空格为分隔符,连续空格只算1个。对所选...
  窗体代码 1 Private Sub Text1_OLEDragDrop(Data As Dat...