Syntax
Public Sub RemoveItemByKey(ByVal value As List(Of VTLControls.ListViewItem))
Description
To remove item base on item key.
Parameters
Parameter |
Description |
columns |
List of ListViewItem to remove from list view |
Sample
Dim colvalues as System.Collections.Generic.List(Of VTLGeneral.VTLControls.ListViewcolumn)
Dim colvalue as VTLGeneral.VTLControls.ListViewcolumn
Dim lst as VTLGeneral.VTLControls.VTLListView
Dim frm as VTLGeneral.VTLForm
Dim itemvalues as New System.Collections.Generic.List(Of VTLGeneral.VTLControls.ListViewItem)
Dim itemvalue as VTLGeneral.VTLControls.ListViewItem
Public Sub main()
lst= New VTLGeneral.VTLControls.VTLListView("lst1")
frm= New VTLGeneral.VTLForm("frm1")
frm.AddVTLControl(lst)
lst.Height = "2000"
lst.width = "2000"
Dim btn as VTLGeneral.VTLControls.CChartObjectButton
btn = New VTLGeneral.VTLControls.CChartObjectButton("btn1")
frm.AddVTLControl(btn)
btn.caption = "Remove"
colvalues = New System.Collections.Generic.List(Of VTLGeneral.VTLControls.ListViewcolumn)
colvalue = New VTLGeneral.VTLControls.ListViewcolumn
colvalue.Text = "Col1"
colvalue.Key = "Col1"
colvalue.Index = cstr(1)
colvalues.add(colvalue)
lst.AddHeader(colvalues)
colvalues.clear()
colvalues = New System.Collections.Generic.List(Of VTLGeneral.VTLControls.ListViewcolumn)
colvalue = New VTLGeneral.VTLControls.ListViewcolumn
colvalue.Text = "Col2"
colvalue.Key = "Col2"
colvalue.Index = cstr(2)
colvalues.add(colvalue)
lst.AddHeader(colvalues)
colvalues.clear()
frm.show()
itemvalue = New VTLGeneral.VTLControls.ListViewItem
itemvalue.Text = "Data"
itemvalue.Key = "S"
itemvalue.Index=CSTR(1)
itemvalue.AddSubItem("info1")
itemvalues.add(itemvalue)
itemvalue = New VTLGeneral.VTLControls.ListViewItem
itemvalue.Text = "Data"
itemvalue.Key = "W"
itemvalue.Index = CSTR(1)
itemvalue.AddSubItem("info2")
itemvalues.add(itemvalue)
lst.AddListItem(itemvalues)
End Sub
Public Sub frm1_btn1_click()
itemvalues.clear()
itemvalue = New VTLGeneral.VTLControls.ListViewItem
itemvalue.Key = "W"
itemvalues.add(itemvalue)
lst.RemoveItemByKey(itemvalues)
End Sub
See Also
Back to VTL Server Script Index
|