继续上一节讲解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,那么运行的时候显示如下:
可以看到,并没有显示第二个ListViewSubItem的内容。那么,如何才能显示呢?那就是添加列标题。
这样就可以正确显示了:
'添加列标题 Private Sub Button4_Click(sender As Object,e As EventArgs) Handles Button4.Click ListView1.Columns.Add("使用的图片") End Sub
或者指定宽度并制定对齐方式:
按下“添加列标题”后,就可以看到第二个ListViewSubItem会立即显示出来:
原文地址:https://www.jb51.cc/vb/256626.html
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。