Dim Bar As WinForm.NavBarBar = e.Form.Controls("NavBar1")Bar.SelectedPage = Bar.NavPages("小土豆")
这个放到窗口的afterload无效