2010-04-12 4 views
1

J'essaie de définir des tabulations dans un CheckedListBox dans mon application WinForms, mais peu importe ce que je fais, cela ne semble pas avoir d'effet. Je le suivais dans le code de ma forme:LB_SETTABSTOPS ne semble pas affecter un CheckedListBox

<DllImport("user32.dll")> _ 
Public Sub SendMessage(ByVal hWnd As IntPtr, ByVal uMsg As Int32, ByVal wParam As Int32, ByRef lParam As Int32) 
End Sub 

Public Const LB_SETTABSTOPS As Int32 = &H192 

Et dans la méthode de charge de la forme, je fais ce qui suit, où theList est mon CheckedListBox:

Dim tabStops() As Integer = {40, 140, 240} 
Call SendMessage(theList.Handle, LB_SETTABSTOPS, tabStops.Length, tabStops(0)) 
theList.Refresh() 

Et puis plus tard, je utiliser dans une boucle, où col1 par col4 sont toutes les valeurs de chaîne pour les colonnes:

theList.Items.Add(col1 & vbTab & col2 & vbTab & col3 & vbTab & col4) 

Mais peu importe ce que je l'utilise pour les valeurs de tabStops, la liste est formaté avec onglet largeur standard arrête.

+0

un peu trop tard, mais https://support.microsoft.com/en-us/kb/318600 – Slai

Répondre

Questions connexes