Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
SSTAB Control
Message
From
03/07/2001 11:04:35
 
General information
Forum:
Visual Basic
Category:
ActiveX controls
Title:
Miscellaneous
Thread ID:
00525936
Message ID:
00526300
Views:
19
>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

Previous
Reply
Map
View

Click here to load this message in the networking platform