listview

[johnny1963]

wie kan mij helpen ?
ik heb op een form een listview met enkel columnheaders
View staat op details
als ik op de header van de listview met de rehctermuisknop klik wil ik een checkedlistbox zien.
waarin ik kan kiezen welke kolom ik wil zien cq verbergen.
bij voorbaat dank
ik gebruik visual basic 2005

 

[johnny1963]

oplossing

hier volgt dan de oplossing zelf uitgevonden: wel eerst een contextmenustrip toevoegen.

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Dim tsmi As New ToolStripMenuItem("kolom weergave")
AddHandler tsmi.Click, AddressOf itemClicked
ContextMenuStrip1.Items.Add(tsmi)

End Sub

Private Sub itemClicked(ByVal sender As Object, ByVal e As EventArgs)

Dim tsmi As ToolStripMenuItem = DirectCast(sender, ToolStripMenuItem)
Dim ch As ColumnHeader = DirectCast(tsmi.Tag, ColumnHeader)

Form4.Show() 'met de checkedlistbox erbij

End Sub

Private Sub ContextMenuStrip1_openen(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles ContextMenuStrip1.Opening

Dim p As Point = MousePosition
p = ListView1.PointToClient(p)

If p.Y >= SystemInformation.ToolWindowCaptionHeight Then e.Cancel = True
End Sub