111,126
社区成员
发帖
与我相关
我的任务
分享
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