Dim nb As WinForm.NavBar = e.Form.Controls("NavBar1")For i As Integer = 0 To nb.NavPages.count-1 nb.NavPages(i).Visible = FalseNext