Listbox colonne invisible
gnosis35
Messages postés
57
Date d'inscription
samedi 27 mars 2004
Statut
Membre
Dernière intervention
5 avril 2010
-
15 févr. 2005 à 21:11
Gobillot Messages postés 3140 Date d'inscription vendredi 14 mai 2004 Statut Membre Dernière intervention 11 mars 2019 - 16 févr. 2005 à 01:28
Gobillot Messages postés 3140 Date d'inscription vendredi 14 mai 2004 Statut Membre Dernière intervention 11 mars 2019 - 16 févr. 2005 à 01:28
A voir également:
- Listbox colonne invisible
- Vba parcourir une colonne - Forum Visual Basic 6
- Sql ajouter une colonne dans un select - Forum SQL
- Vba listbox additem ✓ - Forum Visual Basic 6
- Selectionner la derniere cellule non vide d'une colonne excel vba ✓ - Forum Visual Basic 6
- Parcourir colonne pour comparaison de date ✓ - Forum VBA Office (Excel, Word ...)
1 réponse
Gobillot
Messages postés
3140
Date d'inscription
vendredi 14 mai 2004
Statut
Membre
Dernière intervention
11 mars 2019
34
16 févr. 2005 à 01:28
16 févr. 2005 à 01:28
form2 est à éviter. utilises les tabulations.
Private Declare Function SendMessage Lib "user32" Alias _
"SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, _
ByVal wParam As Long, lParam As Any) As Long
Private Const LB_SETTABSTOPS = &H192
Private mavArray()
As Variant
Private Sub Form_Load()
Dim alTabs(2) As Long
alTabs(1) = -65
alTabs(2) = 65
SendMessage List1.hwnd, LB_SETTABSTOPS, 0&, 0&
SendMessage List1.hwnd, LB_SETTABSTOPS, UBound(alTabs), alTabs(1)
End Sub
Daniel
Private Declare Function SendMessage Lib "user32" Alias _
"SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, _
ByVal wParam As Long, lParam As Any) As Long
Private Const LB_SETTABSTOPS = &H192
Private mavArray()
As Variant
Private Sub Form_Load()
Dim alTabs(2) As Long
alTabs(1) = -65
alTabs(2) = 65
SendMessage List1.hwnd, LB_SETTABSTOPS, 0&, 0&
SendMessage List1.hwnd, LB_SETTABSTOPS, UBound(alTabs), alTabs(1)
End Sub
Daniel
