再点Next按钮,则同样进入第3个页面,最后的第4个页面如下,可以看到输出了用户之前各页面输入的信息:

为了在最后输出用户之前输入的信息,在第3个页面(view)的Finished按钮中的事件中,写入如下代码:
Partial Class Survey
Protected Sub btnFinish_Click(ByVal sender As Object,
ByVal e As System.EventArgs) Handles btnFinish.Click
lblFirstName.Text = txtFirstName.Text
lblLastName.Text = txtLastName.Text
lblEmailId.Text = txtEmail.Text
If rdoVB.Checked Then
lblLanguage.Text = "VB"
ElseIf rdoCSharp.Checked Then
lblLanguage.Text = "C#"
ElseIf rdoJava.Checked Then
lblLanguage.Text = "Java"
End If
If rdoMicrosoft.Checked Then
lblOrganization.Text = "Microsoft"
ElseIf rdoSun.Checked Then
lblOrganization.Text = "Sun Microsystems"
ElseIf rdoIBM.Checked Then
lblOrganization.Text = "IBM"
End If
End Sub
Wizard向导控件
在asp.net 2.0中,wizard向导控件比multiview控件更方便。Wizard控件本身已经设置了比如上一步,下一步,完成等按钮了,而且在设计视图状态下,可以根据自己需要查看每一步骤的页面的内容,而不象multiview控件那样,在设计视图下,在一个页面中,将全部所有的步骤涉及的页面都显示出来。下面看下wizard控件的重要属性和事件:
ActiveStepIndex - 显示当前是向导中的第几个步骤,在页面刚开始加载时,默认是0.
DisplaySideBar - 当该属性设置为true时,则将整个流程的步骤全部显示在页面中。
DisplayCancelButton - 当该属性设置为true时,在每个页面中,都将显示一个cancel的按钮,要处理取消的事件,可以在 CancelButtonClick() 中编写代码
一些重要事件
ActiveStepChanged.---当从一个步骤转换到另一个步骤时,触发的事件
PreviousButtonClick.-当按"上一步"按钮时触发的事件
NextButtonClick. ---当按"下一步"按钮时触发的事件
FinishButtonClick.-----当"完成"按钮时触发的事件
CancelButtonClick. -----当"取消"按钮时触发的事件
下面,我们重新建立一个空白页面,同样使用之前的模版页面作为模版页。往页面里拖放一个wizard控件,在控件的wizardsteps属性中,点击并弹出新窗口,如下图所示

在这里通过"Add"增加步骤。在增加若干个步骤后,按确定按钮。回到wizard控件,选择并且点选wizard控件的右上角的智能感知标记,在弹出的窗口中的"Step"下拉列表中,可以选择每一个步骤的页面,分别为每一个步骤的页面添加相关控件,这里,我们设计了四个步骤,其中的第一个步骤的页面如下图所示,其他步骤的页面和代码见附件的代码:

最后,在最后一个页面的Finish按钮的事件中,写入如下代码,以显示之前几步用户的输入:
Protected Sub Wizard1_FinishButtonClick(ByVal sender As Object,
ByVal e As System.Web.UI.WebControls.WizardNavigationEventArgs)
Handles Wizard1.FinishButtonClick
lblFirstName.Text = txtFirstName.Text
lblLastName.Text = txtLastName.Text
lblEmailId.Text = txtEmail.Text
lblUserName.Text = txtUserName.Text
If rdoDaily.Checked Then
lblNewsletters.Text = "Daily Updates"
ElseIf rdoWeekly.Checked Then
lblNewsletters.Text = "Weekly Summary"
ElseIf rdoNoThanks.Checked Then
lblNewsletters.Text = "No Thanks"
End If
End Sub