加入收藏 | 设为首页 | 会员中心 | 我要投稿 李大同 (https://www.lidatong.com.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 大数据 > 正文

VB listview用法

发布时间:2020-12-17 00:24:40 所属栏目:大数据 来源:网络整理
导读:我新建了一个listview控件名为LV1现在求源码==在lv1中添加4列,分别为:序号,时间,日期,备注并且添加两行内容,分别为:1,00:00:00,2008-01-01,(无) 2,00:00:01,2008-01-01,(无)哪位大虾帮忙写源码~~~,小弟感谢啊!总体效果:序号,时间,日期,备
我新建了一个listview控件名为LV1
现在求源码==>>在lv1中添加4列,分别为:序号,时间,日期,备注
并且添加两行内容,分别为:1,00:00:00,2008-01-01,(无)
                          2,00:00:01,2008-01-01,(无)

哪位大虾帮忙写源码~~~,小弟感谢啊!
总体效果:
序号,时间,日期,备注
1,00:00:00,2008-01-01,(无)
2,00:00:01,2008-01-01,(无)
最佳答案
代码如下。
==================
Private Sub Form_Load()
LV1.View = lvwReport
LV1.ColumnHeaders.Add,"序号"
LV1.ColumnHeaders.Add,"时间"
LV1.ColumnHeaders.Add,"日期"
LV1.ColumnHeaders.Add,"备注"
LV1.ListItems.Add,"1"
LV1.ListItems(1).SubItems(1) = "00:00:00"
LV1.ListItems(1).SubItems(2) = "2008-01-01"
LV1.ListItems(1).SubItems(3) = "(无)"
LV1.ListItems.Add,"2"
LV1.ListItems(2).SubItems(1) = "00:00:01"
LV1.ListItems(2).SubItems(2) = "2008-01-01"
LV1.ListItems(2).SubItems(3) = "(无)"
End Sub

(编辑:李大同)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章
      热点阅读