|
-
May 22nd, 2013, 03:33 AM
#1
Thread Starter
Fanatic Member
SSTAB (Microsoft Tabbed Dialoge Control) Tutorial
Hi,
Anyone can give / suggest the tutorial of SSTAB Control
-
May 22nd, 2013, 03:58 AM
#2
Re: SSTAB (Microsoft Tabbed Dialoge Control) Tutorial
Last edited by Bonnie West; May 22nd, 2013 at 06:40 AM.
Reason: Added more
On Local Error Resume Next: If Not Empty Is Nothing Then Do While Null: ReDim i(True To False) As Currency: Loop: Else Debug.Assert CCur(CLng(CInt(CBool(False Imp True Xor False Eqv True)))): Stop: On Local Error GoTo 0
Declare Sub CrashVB Lib "msvbvm60" (Optional DontPassMe As Any)
-
May 22nd, 2013, 12:31 PM
#3
Thread Starter
Fanatic Member
Re: SSTAB (Microsoft Tabbed Dialoge Control) Tutorial
Thanks,
Actually I want that when i clicked on the third tab "Accounts List", it will automatically get focus on txtGridSearch, how it is possible ?
-
May 22nd, 2013, 12:41 PM
#4
Re: SSTAB (Microsoft Tabbed Dialoge Control) Tutorial
 Originally Posted by hafizfarooq
Actually I want that when i clicked on the third tab "Accounts List", it will automatically get focus on txtGridSearch, how it is possible ?
If you mean "set the focus", try this:
Code:
Private Sub SSTab1_Click(PreviousTab As Integer)
If SSTab1.Tab = 2 Then txtGridSearch.SetFocus 'The 3rd Tab's number is 2
End Sub
On Local Error Resume Next: If Not Empty Is Nothing Then Do While Null: ReDim i(True To False) As Currency: Loop: Else Debug.Assert CCur(CLng(CInt(CBool(False Imp True Xor False Eqv True)))): Stop: On Local Error GoTo 0
Declare Sub CrashVB Lib "msvbvm60" (Optional DontPassMe As Any)
-
May 22nd, 2013, 01:08 PM
#5
Thread Starter
Fanatic Member
Re: SSTAB (Microsoft Tabbed Dialoge Control) Tutorial
Thanks,
Can we change the tab look ?
-
May 22nd, 2013, 01:19 PM
#6
Re: SSTAB (Microsoft Tabbed Dialoge Control) Tutorial
 Originally Posted by hafizfarooq
Can we change the tab look ?
There's no built-in property or method to do that but it may be possible through subclassing. Take a look at XTab instead.
On Local Error Resume Next: If Not Empty Is Nothing Then Do While Null: ReDim i(True To False) As Currency: Loop: Else Debug.Assert CCur(CLng(CInt(CBool(False Imp True Xor False Eqv True)))): Stop: On Local Error GoTo 0
Declare Sub CrashVB Lib "msvbvm60" (Optional DontPassMe As Any)
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|