1、首先,点击文件->新建->项目,打开项目创建视窗,切换到Visual Basic,选择Windows窗体应用程序,新建一个。
2、在左侧工具箱中找到ListView控件,单击并在右侧窗体中创建一个。
3、点击ListView控件右上角的小按钮,展开ListView任务面板,点击编辑项,打开ListViewItem集合编辑器。
4、新建一个按钮,在按钮的事件响应函数中写下MsgBox(ListView1.ToString()),ListView的ToString函数返回的是这个控件的信息,如图。
5、如果要获取所有item的信息,使用For Each循环遍历item如下。
6、这样把每个列表元素的ToString等信息存到tps字符串,显示出来如图。
添加listview控件的方法如下:
打开VB6.0
按下CTRL+T
添加Microsoft Windows Common Controls 6.0部件
就会出现listview控件了
属性:Sorted,BackColor,Checkboxes,BorderStyle,hWnd,Enabled等
方法:SelectedItem,FindItem,Move,Refresh,SetFocus等
常用的可参考如下实例:
ListView1.View = lvwReportListView1.ColumnHeaders.Add 1, "Id", "", 700
ListView1.ColumnHeaders.Add 2, "Title", "标题", 1300
ListView1.ColumnHeaders.Add 3, "Hwnd", "句柄", 900
ListView1.ColumnHeaders.Add 4, "Infms", "信息", 2600
ListView1.Sorted = True
ListView1.Checkboxes = True
Private l As ListItem
Set l = ListView1.ListItems.Add(1, "", Str(ListView1.ListItems.count + 1))
l.SubItems(1) = "标题1"
l.SubItems(2) = "标题1"
l.SubItems(3) = "标题3"
print ListView1.ListItems(1).SubItems(1)
LV.ListItems.Clear
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)