Browse DevX
Sign up for e-mail newsletters from DevX

Tip of the Day
Language: Visual Basic
Expertise: Intermediate
Aug 4, 1997



Building the Right Environment to Support AI, Machine Learning and Deep Learning

Make Column Headers the Perfect Width

When you're dynamically adding ColumnHeaders to a ListView control at run time, you may not know how long the text for the header will be, so the user must readjust the width of the column to see it. But by making a label with its Visible property set to False, and its Autosize property set to True, you can fill up the label with the same text that's going to be in the header. Then use Label1.Width in the Add argument for the ColumnHeader:
Private Sub Command1_Click( )
	Dim ColumnText as String, clmx as ColumnHeader
	ColumnText = _
		"A very long header for " & "the ListView control"
	Label1.Caption = ColumnText
	set clmx = ListView1.ColumnHeaders.Add_
		(, , ColumnText, Label1.Width)
	ListView1.View = lvwReport
End Sub
Rich Wigstone
Comment and Contribute






(Maximum characters: 1200). You have 1200 characters left.



Thanks for your registration, follow us on our social networks to keep up-to-date