Enlever WizardPage de Wizard dotnebar vb.net

Question

J'utilise le dotnetbar libray, j'ai ajouté un wizardpage pendant la conception et quelques autres pendant l'exécution, puis un dernier après que l'utilisateur arrive à la fin de l'assistant et j'ai utilisé une commande permettant de passer automatiquement à la nouvelle (dernière) page de création créée. J'ai utilisé le code suivant pour supprimer les autres pages de l'assistant à l'exception de la page actuellement sélectionnée.

Dim wiz As New DevComponents.DotNetBar.WizardPage 'pages 
    With wiz 
     .InteriorPage = True 
     .Name = "Summary" 
     .PageTitle = "Summary" 
     .PageDescription = "Details of the Summary." 
     .Controls.Add(lbl1) 
     .Controls.Add(lbl2) 
     .Controls.Add(lbl3) 
     .Controls.Add(lbl4) 
     .Controls.Add(lbl5) 
     .Controls.Add(lbl6) 
     .Controls.Add(gp) 
    End With 
    CBTWizard.WizardPages.Add(wiz) 
    CBTWizard.Refresh() 

    CBTWizard.SelectedPage = wiz 

    Dim c1 As Control 
    Dim c2 As Control 
    For Each c1 In CBTWizard.Controls 
     If TypeOf c1 Is DevComponents.DotNetBar.WizardPage Then 
      If c1.Name <> "Summary" Then 
       CBTWizard.WizardPages.Remove(c1) 
      End If 
     End If 
     CBTWizard.Refresh() 
    Next 

Problème: Je veux l'assistant pour réorganiser de manière à ne plus afficher le bouton Back, type de l'assistant de rafraîchissement pour montrer la présence d'un seul wizardpage restant.

Answer 1

J'ai eu un travail autour, au lieu de réorganiser l'ordre, j'ai simplement fait le bouton arrière, le bouton suivant invincible et j'ai désactivé le bouton Terminer. Le flux logique a fonctionné de cette façon.

With wiz 
     .InteriorPage = True 
     .Name = "Summary" 
     .PageTitle = "Summary" 
     .PageDescription = "Details of Summary." 
     .Controls.Add(lbl1) 
     .Controls.Add(lbl2) 
     .Controls.Add(lbl3) 
     .Controls.Add(lbl4) 
     .Controls.Add(lbl5) 
     .Controls.Add(lbl6) 
     .Controls.Add(gp) 
     .FinishButtonEnabled = DevComponents.DotNetBar.eWizardButtonState.False 
     .BackButtonVisible = DevComponents.DotNetBar.eWizardButtonState.False 
     .NextButtonVisible = DevComponents.DotNetBar.eWizardButtonState.False 
    End With 

Ces ajoutai-je seulement au dernier wizardpage créé.