RemoveColumnByIndex
Posted by Mohammad Rahhal, Last modified by Abdullah Almasharfah on 07 December 2018 07:53 PM

Syntax

Public Sub RemoveColumnByIndex(ByVal columns As List(Of ListViewcolumn))

This method is used to remove column base on index .

Parameters

Parameter  Description
columns List of ListViewcolumn to add

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 = "Clear"

      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)

      lst.AddListItem(itemvalues)

 End Sub

 Public Sub frm1_btn1_click()

      colvalues = New System.Collections.Generic.List(Of VTLGeneral.VTLControls.ListViewcolumn)
      colvalue = New VTLGeneral.VTLControls.ListViewcolumn
      colvalue.Index = cstr(2)
      colvalues.add(colvalue)

      lst.RemoveColumnByIndex(colvalues)

 End Sub


See Also


Back to VTL Server Script Index

(0 vote(s))
Helpful
Not helpful

Comments (0)
Post a new comment
 
 
Full Name:
Email:
Comments:
CAPTCHA Verification 
 
Please enter the text you see in the image into the textbox below (we use this to prevent automated submissions).

Help Desk Software by Hybrid Solutions