Just to clarify, this is in regards to the new Navigation Buttons as part of the new NavigationControl object, not the record navigation buttons at the bottom.
On form Open I am hiding some Navigation buttons depending on a users rights. This is fine but then I am left with blanks in the Navigation menu. What I would like to do is shift the visible ones over to the left.
I found the following reference, but can't find any sample code (if this is even what I am looking for).
Anyone work with this new Navigation control?
Here is what I have so far. If I leave that last line (the move line) in none of the buttons appear. (fyi, the order of the nav buttons is 1) navNew, 2) navSearch 3) navReports 4) navAdmin.
Private Sub Form_Open(Cancel As Integer)
Me.navNew.Visible = Forms!LoginScreen!NewRA
Me.navSearch.Visible = Forms!LoginScreen!SearchRA
Me.navReports.Visible = Forms!LoginScreen!Reports
If Forms!LoginScreen!Codes + Forms!LoginScreen!Users = 0 Then
Me.navAdmin.NavigationTargetName = "ChangePassword"
Me.navAdmin.NavigationTargetName = "AdminMenu"
If Not (Me.navNew.Visible) Then Me.navSearch.Move 1, 0, 0, 0
I plan on putting this in a loop once I get one figured out.