1、ListView 用法用法 ListView用法 第一步,添加列头 可在 form_load 里头添加如下,初始化 ListView1.FullRowSelect=True;允头整行头头,listview1.gridlines=true(头示格网)listview1.checkboxs=true 头示 checkboxs 框 listview1.view=3 以头表形式头示 ListView1.ColumnHeaders.Clear ListView1.ColumnHeaders.Add 1,姓名,1000 ListView1.ColumnHeaders.Add 2,性头,500 ListVi
2、ew1.ColumnHeaders.Add 3,头称,1500 ListView1.ColumnHeaders.Add 4,头头,1000 第二步添加据 数 Dim itmX As ListItem Set itmX=lvw.ListItems.Add(参数参数参数)头些都可以头空参数具可以看看体你 msdn itmX.text=李四 itmX.SubItems(1)=雄性 itmX.SubItems(2)=大头将 itmX.SubItems(3)=10086 第三步取得行据 数 Private Sub ListView1_ItemClick(ByVal Item As MSComctlLib
3、.ListItem)Text1=Item.Text Text2=Item.SubItems(1)Text3=Item.SubItems(2)Text4=Item.SubItems(3)End Sub 头一头就能知道头用了快去头头怎吧 listview控件可有 4 头不同的头头头示方法“头源管理器”里的“头看”方式相似跟,;1,无头头;2,小头头;3,列表;4,头表式。使用头头头可由头控件的哪 view属性头置控制。其中“头表”头头用头示头头据适合。来数很 listview控件包括 listItem 头象和 ColumnHeader 头象。本人头头理解头,listItem 头象看成据行数 Col
4、umnHeader头象看成列头头。listItem 头象;行,有部分,一部分是头头和头要描述的文本;第两 1列,另一部分是前者的子头文本信息;第 2 列第 3 列.)。而 listItems 即是头 listItem 头象集合;所有行,的引用。故此listItems(1)可以表示头第 1行 listitems(1).text 返回第 1行第 1列的文本头 listitems(1).subItem(1)返回第 1行第 2列的文本头。【控件常用性属】1view属性 头性有属 4个头可头定,1,小头头头头头示 2,列表 3,头表 0,无头头;默头,2AllowColumnReorder 属性 头头置
5、.t.头用头可以用鼠头头中 1 列拖至其他地方头行重新排列。3Checkboxes 属性 头置头.t.头每一行据前头示一头头。数将框 4FlatScrollBar属性 头置头.f.头控件头示头头。将条 5FullRowSelect 属性 头置头.t.头可以整行地头头据。数 6GridLines 属性 头置头.t.头控件头示格头。;只作用于“头表”头头,将网 7HideColumnHeaders 属性 头置头.f.头列头头可头反之头不可头。8HotTracking属性 头置头.t.头鼠头所在行以高亮度头示。将 9Icons,SmallIcons 属性 两者头置 listview 控件头头相头头的
6、 ImageList 控件中的头片。Icons 指明头头头大头头头的头头 SmallIcons 指明头头头小头头头的头头。10LabelWrap 属性 头置头.t.头文本头头超出列头头可头行。11SelectedItem 属性 返回头所头 ListItem 头象;行,的引用。12Sorted 属性 当头头.t.头列表按字母排序。13Picture属性 指定控件的背景头片此性在控件自头性头置里头置。属属框 *【控件常用方法程序】1Add方法 添加 listItem 头象;行,到控件中。头法格式,控件 ListItems 集合.add(index,key,text,icon,smallIcon)2
7、FindItem 方法 头返回头控件中找并 listItem 头象的引用。头法格式,控件名.FindItem(string,value,index,match)*新建一表头在表头里拖出一个 ListView控件和一个 ImageList 控件。头中 ListView控件头头右头头头“ListViewCtrl Properties”在 General 头面中头中下列头头,框框 LabelWrap:文本可头行 Checkboxes:头示头头框 FullRowSelect:整行头定 清除 FlatScrollBar的头定控件头示头头。将条 *控件 name属性 ListView view1 Imag
8、eList Image1 *在表头的 Init 事件中加入下列代头,&将 ImageList 控件头片头予 Listview控件&thisform.view1.Icons=thisform.Image1.object thisform.view1.smallIcons=thisform.Image1.object *在 listview控件 init 事件中加入下列代头,&初始化 ListView 控件&头置头示头头表头头 this.view=3&添加和头置列头 store this.ColumnHeaders.Add(,l11,序号,this.Width/7)to clm1 store th
9、is.ColumnHeaders.Add(,l12,物头头号,this.width/4)to clm2 store this.ColumnHeaders.Add(,l13,存头名称,this.Width/4)to clm3 store this.ColumnHeaders.Add(,l14,头格,this.width/4)to clm4 store this.ColumnHeaders.Add(,l15,头量头位,this.Width/8)to clm5 store this.ColumnHeaders.Add(,l16,头头量数,this.width/4)to clm6 store this
10、.ColumnHeaders.Add(,l17,使用日期,this.Width/4)to clm7 store this.ColumnHeaders.Add(,l18,头头用途,this.width/4)to clm8 this.hottracking=.t.&鼠头停留行高亮度头示 *将数据表添加到 listview 控件中头示,新建一表头方法程序 refresh_grid可头头用刷新据。随数 在其中加入下列代头,L1=thisform.view1 L1.listItems.clear&清数除据 sele 头头表 scan&添加 listItem 头象第 1列头头和文本。store L1.li
11、stItems.Add(,序号,1)to bbb&添加第 2,3.列文本 store alltrim(物头头号)to bbb.subitems(1)store alltrim(存头名称)to bbb.subitems(2)store alltrim(头格)to bbb.subitems(3)store alltrim(头量头位)to bbb.subitems(4)store 头头量数 to bbb.subitems(5)store 使用日期 to bbb.subitems(6)store alltrim(头头用途)to bbb.subitems(7)endscan 注,若字段头头.null.头
12、添加头出头头头提示。将 头自行头置用函加以判头。头数.null.头可以空头添加。*如何返回头定头,L1=thisform.view1 L1.selectedItem.text&返回头定行第 1 列文本头 L1.selectedItem.index&返回头定行的位置 L1.listItems(x).subItems(y)&返回第 x 行第 y+1 列文本头 *如何用用命令头置头头头,框状 thisform.view1.listItems(x).checked=.t.&第 x 行头头头定框 *头定头头头头生的事件框 itemcheck:LPARAMETERS item if item.checke
13、d=.t.&判定头头头头中当框 要头行的头句 else 要头行的头句 endif&清数除所有据 thisform.view1.listItems.clear&清除头定行 L1=thisform.view1 L1.listitems.remove(L1.selectedItem.index)得知所有行的头,数 L1.listitems.count Private Sub Form_Load()ListView1.ListItems.Clear 清空列表 ListView1.ColumnHeaders.Clear 清空列表头 ListView1.View=lvwReport 头头头头头置列表示方式
14、 ListView1.GridLines=True 头头头示网 ListView1.LabelEdit=lvwManual 禁止头头头头 ListView1.FullRowSelect=True 头头整行 ListView1.ColumnHeaders.Add,ID,500 头列表中添加列名 ListView1.ColumnHeaders.Add,本地 IP,1500 ListView1.ColumnHeaders.Add,本地端口,1200 ListView1.ColumnHeaders.Add,头头,550 ListView1.ColumnHeaders.Add,头 程 IP,1500 L
15、istView1.ColumnHeaders.Add,头程端口,900 ListView1.ColumnHeaders.Add,当前状,900 头 ListView1.ColumnHeaders.Add,头头头接,900-Dim X X=ListView1.ListItems.Count+1 ListView1.ListItems.Add,X ListView1.ListItems(X).SubItems(1)=00:00:00 ListView1.ListItems(X).SubItems(2)=2008-01-01 ListView1.ListItems(X).SubItems(3)=(无
16、)-ListView1.ListItems.Clear 清空列表 ListView1.ListItems.Add,1 ListView1.ListItems(1).SubItems(1)=00:00:00 ListView1.ListItems(1).SubItems(2)=2008-01-01 ListView1.ListItems(1).SubItems(3)=(无)ListView1.ListItems.Add,2 ListView1.ListItems(2).SubItems(1)=00:00:01 ListView1.ListItems(2).SubItems(2)=2008-01-
17、01 ListView1.ListItems(2).SubItems(3)=(无)-ListView1.View=lvwReport 头头头头头头头头置示方式列表 ListView1.AllowColumnReorder=True 头头头头头头头头头头头头头头头行行程序排列,用鼠行排列 ListView1.Arrange=lvwAutoLeft 头头横排列 ListView1.Arrange=lvwAutoTop 头头头排列 ListView1.FlatScrollBar=False 头头头头示条 ListView1.FlatScrollBar=True 头头头头藏条 ListView1.Fu
18、llRowSelect=True 头头整行 ListView1.LabelEdit=lvwManual 禁止头头头头 ListView1.GridLines=True 头头头示网 ListView1.LabelWrap=True 头头头头可以行 ListView1.MultiSelect=True 可以多个目头头头头头头 ListView1.PictureAlignment=lvwTopLeft 头头头头头头头头头头片方式是左部,其他有右部头头(1)、左底部(2)、右底部(3)、居中(4)、平头(5)ListView1.Checkboxes=True 头头头头示框 ListView1.Drop
19、Highlight=ListView1.ListItems.Item(2)头头头头示系色 End Sub 常用操作:头取当前行数和列数:MsgBox 行数:&ListView1.ListItems.Count&列数:&ListView1.ColumnHeaders.CountPrivate Sub ListView1_MouseMove(Button As Integer,Shift As Integer,x As Single,y As Single)ListView1.ToolTipText=行数:&ListView1.ListItems.Count&列数:&ListView1.Colum
20、nHeaders.Count End Sub 头头头置度:ListView1.ColumnHeaders.Add,头注,1500 当前中行头头头:MsgBox ListView1.SelectedItem.Index 头头头头头头取框的:MsgBox ListView1.ListItems(1).Checked 头除指定行:ListView1.ListItems.Remove 1 去掉鼠左点头头头头头头头头头:labeledit 属性改头 1 头取某行第一列内容:ListView1.ListItems(i).Text 头 取某行第几列内容(不包括第一列):ListView1.ListItems
21、(Num).SubItems(4)头头头头头头头头头取当前中行第一列内容:ListView1.ListItems(ListView1.SelectedItem.Index).Text 循找取目头头头头头头头:Dim i As Integer For i=1 To ListView1.ListItems.Count If ListView1.ListItems(i).Text=4 Then MsgBox ListView1.ListItems(i).Text 第一列 If ListView1.ListItems(i).SubItems(1)=4 Then MsgBox ListView1.Lis
22、tItems(i).SubItems(1)第二列 Next i 清空列表:头 ListView1.ColumnHeaders.Clear 清空列表:ListView1.ListItems.Clear 右菜头头头:Private Sub ListView1_MouseDown(Button As Integer,Shift As Integer,x As Single,y As Single)If Button=vbRightButton Then PopupMenu CommandLst 按下鼠右示菜头头 头头 End Sub 当前中判断头头头头:Dim N If ListView1.List
23、Items.Count 0 Then N=ListView1.SelectedItem.Index Else MsgBox 当前没有任何主机在!,vbInformation,头警告:Exit SubIf N 1 Then MsgBox 你没有中任何主机头头头头头头!,vbInformation,警告:Exit SubVB头头头头置某行中/非中状头头头头:ListView.ListItems(i).Selected=True 头中第 i 行 ListView.ListItems(i).Selected=False 头中第 i 行 Add 方法,ListItems 集合,添加 ListItem 头
24、象到 ListView 控件的 ListItems 集合中并返回新建象的引用。头头头头头头头头 头 法 object.Add(index,key,text,icon,smallIcon)Add 方法的法包含下面部分:头头头头头头头头头 部分 描述 object 必需的。象表达式,其是头头头头头头头头头 ListItems 集合。index 可的。指定在何插入头头头头头头头头头头 ListItem 的整数。若未指定索引,将头头 ListItem 添加到 ListItems 集合的末尾。key 可的。唯一的字符串表达式,用来集合成。头头头头头头头头头头头头头头头头头头头头头头 text 可的。与头
25、头头头 ListItem 头头头头头头头头象控件的字符串。icon 可的。当头头头头 ListView 控件,此整数置从头头头头头头头头头头头头头头 ImageList 控件中定的头头头欲示的。头头头头头头 smallIcon 可的。当头头头头 ListView 控件小,此整数置从头头头头头头头头头头头头头 ImageList 控件中定头头的欲示的。头头头头头头 头 明 头置 Icons 或 SmallIcons 属性之前必先初始化它。有两初始化方法:在,使用头头头头头头头头头头头头头头头头头头头头头头头头 ListView 控件属性框的头头“”头头通用卡指定 ImageList 头头头头头头
26、头象,在运行,使用下列代初始化:头头头头头 ListView1.Icons=ImageList1 假头 Imagelist 头 ImageList1。ListView1.SmallIcons=ImageList2 如果列表尚未排序,可使用头头头头 index 参数将 ListItem 头象插入到任意位置。如果列表已排序,头将忽略 index 参数并根据排序序把头头头 ListItem 头 象插入到适当的位置。若未提供 index,头 ListItem 头象将被添加一个索引,此索引等于集合中 ListItem 头象的数目加 1。当希望象的头头头 Index 属性可更,例如希望地从集合中添加和除象,使用头头头头头头头头头头头头头头头头头头头头头头头头头头 Ke y 属性引用 ListItems 集合的成头
copyright@ 2008-2022 冰豆网网站版权所有
经营许可证编号:鄂ICP备2022015515号-1