Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
SSTAB Control
Message
 
 
Information générale
Forum:
Visual Basic
Catégorie:
Contrôles ActiveX
Titre:
Divers
Thread ID:
00525936
Message ID:
00526300
Vues:
21
>Hi,
>
>I have a Tab control which has about 8 tabs per row, is there anyway I can use Alt Keys to navigate the Tabs like Alt+N to see the next Tab, and Alt+P to see the Previous tab? If anyone did this beofe please forward me the sample codes.
>
>Thank you
>Shaj

You will have to catch the keys.
Private Sub SSTab1_KeyDown(KeyCode As Integer, Shift As Integer)

   Dim AltDown
   AltDown = (Shift And vbAltMask) > 0
   
   If (KeyCode = 78 And AltDown) And SSTab1.Tab < (SSTab1.Tabs - 1) Then
        SSTab1.Tab = SSTab1.Tab + 1 ' next
   End If
   
   If (KeyCode = 80 And AltDown) And SSTab1.Tab > 0 Then
        SSTab1.Tab = SSTab1.Tab - 1 ' previous
   End If
    
End Sub
~Joe Johnston USA

"If ye love wealth better than liberty, the tranquility of servitude better than the animated contest of freedom, go home from us in peace. We ask not your counsel or arms. Crouch down and lick the hands which feed you. May your chains set lightly upon you, and may posterity forget that ye were our countrymen."
~Samuel Adams

Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform