CodeXchange.org Addin for Visual Studio.NET

Code Snippet Preview

Review the code snippet before inserting it on your project.

Snippet Metadata
Summary:	WDM - Outlook Panes Navigation
Language:	VB.NET
Author:	Daren Hawes
Author snippets RSS:
Culture:	en-US
Bytes:	1919
Visual Studio 2005 Snippet:

Snippet Stats
Downloads:	4
Overall rating :	0
Average rating :

Snippet Preview

Code:

Dim CurrentSelectedIndex As Integer = OutlookPanesControl1.SelectedIndex
        Select Case CurrentSelectedIndex
            Case 0 ' The Lounge
                HideAllPanels()
                TheLoungePanel.Visible = True
                TheLoungePanel.Location = New Point(184, 48)
            Case 1 ' Parties
                HideAllPanels()
                PartiesPanel.Visible = True
                PartiesPanel.Location = New Point(184, 48)
            Case 2 ' Orders
                HideAllPanels()
                OrdersPanel.Visible = True
                OrdersPanel.Location = New Point(184, 48)
            Case 3 ' Commission
                HideAllPanels()
                CommissionsPanel.Visible = True
                CommissionsPanel.Location = New Point(184, 48)
            Case 4 ' Reports
                HideAllPanels()
                ReportsPanel.Visible = True
                ReportsPanel.Location = New Point(184, 48)
            Case 5 ' Marketing
                HideAllPanels()
                MarketingPanel.Visible = True
                MarketingPanel.Location = New Point(184, 48)
                MarketingPanel2.Location = New Point(1184, 48)
            Case 6 ' Training
                HideAllPanels()
                TrainingPanel.Visible = True
                TrainingPanel.Location = New Point(184, 48)
            Case 7 ' Forum
                HideAllPanels()
                ForumPanel.Visible = True
                ForumPanel.Location = New Point(184, 48)
            Case 8 ' Manager
                HideAllPanels()
                ManagersPanel.Visible = True
                ManagersPanel.Location = New Point(184, 48)
            Case 9 ' Administration
                HideAllPanels()
                AdministrationPanel.Visible = True
                AdministrationPanel.Location = New Point(184, 48)
        End Select

Snippet Comments

Comments:

No comments for this snippet

Other snippets that may interest you..

Related Snippets

TDT - GridPage - Page_Init (C#)

CustomValitaor (C#)

(C#)

Get the file extension from a file path or file name (VB.NET)

grab record from db and subtracts it from variable (VB.NET)

With from Barcelona