左边是一个第三方的控件,当然,也可以自己做,得费点时间。右边是一个Panel容器,容器里是一个自定义控件,当点击左边导航栏上的标题时,用程序的方法动态加载用户控件。 示例代码如下:Private Sub itemLoadFC_LinkClicked(ByVal sender As System.Object, ByVal e As DevExpress.XtraNavBar.NavBarLinkEventArgs) Handles itemLoadFC.LinkClicked ClearControls()‘清空容器里的自定义控件 Dim ctrl As New ctrlLoadFCOrders ctrl.Dock = DockStyle.Fill ‘把控件状态设置为填充 ctrl.userName = Me._userName ’获取用户名 MainPanel.Controls.Add(ctrl) ’加载控件 End Sub 不好意思,手头只有VB的代码,不过意思差不多,我这里用的是DEV Express的控件
http://www.codeproject.com/ 这个网站上大把这些东西
示例代码如下:Private Sub itemLoadFC_LinkClicked(ByVal sender As System.Object, ByVal e As DevExpress.XtraNavBar.NavBarLinkEventArgs) Handles itemLoadFC.LinkClicked
ClearControls()‘清空容器里的自定义控件
Dim ctrl As New ctrlLoadFCOrders
ctrl.Dock = DockStyle.Fill ‘把控件状态设置为填充
ctrl.userName = Me._userName ’获取用户名
MainPanel.Controls.Add(ctrl) ’加载控件
End Sub
不好意思,手头只有VB的代码,不过意思差不多,我这里用的是DEV Express的控件