Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Public Class WizardPages
- Inherits TabControl
- Protected Overrides Sub WndProc(ByRef m As Message)
- '--- Hide tabs by trapping the TCM_ADJUSTRECT message
- If m.Msg = &H1328 AndAlso Not DesignMode Then
- m.Result = CType(1, IntPtr)
- Else
- MyBase.WndProc(m)
- End If
- End Sub
- End Class
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement