从 Wizard dotnebar 中删除 WizardPage vb.net
Remove WizardPage from Wizard dotnebar vb.net
我正在使用 dotnetbar
库,我在设计期间添加了一个向导页面,在 运行 期间添加了一些向导页面,然后在用户到达向导结束后添加了最后一个页面,并且我使用命令自动切换到新(最后)创建的向导页面。我使用以下代码删除了除当前所选页面之外的其他向导页面。
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
问题:我想重新排列向导,使其不再显示 Back
按钮,某种向导刷新以显示只剩下一个向导页面。
我有一个变通办法,我没有重新排列顺序,而是让后退按钮、下一步按钮无敌,并禁用了完成按钮。逻辑流程就是这样。
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
这些我只添加到最后创建的向导页面。
我正在使用 dotnetbar
库,我在设计期间添加了一个向导页面,在 运行 期间添加了一些向导页面,然后在用户到达向导结束后添加了最后一个页面,并且我使用命令自动切换到新(最后)创建的向导页面。我使用以下代码删除了除当前所选页面之外的其他向导页面。
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
问题:我想重新排列向导,使其不再显示 Back
按钮,某种向导刷新以显示只剩下一个向导页面。
我有一个变通办法,我没有重新排列顺序,而是让后退按钮、下一步按钮无敌,并禁用了完成按钮。逻辑流程就是这样。
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
这些我只添加到最后创建的向导页面。