[vb6] Récuperer la position de la colonne [MSHFlexGrid]
Bonjour,
Voila, j'ai un ch'ti souci. Je ne parviens pas à récupérer la position de la colonne dans une MSHFlexGrid. :oops:
Mon but est de savoir sur quelle colonne et quelle ligne l'utilisateur a cliqué. Pour la ligne, pas de souci.
Code:
1 2 3 4 5 6 7 8 9 10
| Private Sub Install_MSHGrid_Click()
Dim tmp_CmbHeight As Long
Dim tmp_ClickCol As Integer
tmp_ClickCol = Install_MSHGrid.Col
MsgBox "Colonne Sel : " & Install_MSHGrid.ColSel & " ** Ligne Sel : " & Install_MSHGrid.RowSel & vbCr & _
"Colonne : " & Install_MSHGrid.Col & " ** Ligne : " & Install_MSHGrid.Row & vbCr & _
"ClickCol : " & tmp_ClickCol & vbCr & _
"Top : " & Install_MSHGrid.Top & "** Left : " & Install_MSHGrid.Left & vbCr & _
"Content(.row,.col) : " & Install_MSHGrid.TextMatrix(Install_DBGrid.Row, Install_MSHGrid.Col) & vbCr & _
"Content(.rowsel,.colsel) : " & Install_MSHGrid.TextMatrix(Install_MSHGrid.RowSel, Install_MSHGrid.ColSel) |
A chaque fois, que ce soit .Col ou .ColSel, j'ai la valeur 1 qui est retournée.
D'avance merci.
Jean-Luc