|
<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="Default_aspx" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN" "http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
<title>Untitled Page</title>
</head>
<body>
<form id="form1" runat="server">
<div>
<asp:Wizard ID="Wizard1" runat="server" ActiveStepIndex="0" Width="308px">
<WizardSteps>
<asp:WizardStep runat="server" Title="Step 1">
Enter your name:<br />
First Name
<asp:TextBox runat="server" ID="txtFirstName"></asp:TextBox>
<br />
Last Name
<asp:TextBox runat="server" ID="txtLastName"></asp:TextBox>
<br />
</asp:WizardStep>
<asp:WizardStep runat="server" Title="Step 2">
Birthday:<br />
<asp:Calendar runat="server" ID="Calendar1"></asp:Calendar>
</asp:WizardStep>
<asp:WizardStep runat="server" Title="Step 3">
Thank you for registering with us.</asp:WizardStep>
</WizardSteps>
</asp:Wizard>
</div>
<br />
<br />
</form>
</body>
</html>
File: Default.aspx.vb
Partial Class Default_aspx
Inherits System.Web.UI.Page
Protected Sub Wizard1_FinishButtonClick(ByVal sender As Object, _
ByVal e As System.Web.UI.WebControls.WizardNavigationEventArgs) _
Handles Wizard1.FinishButtonClick
Response.Write("You have registered as " & _
txtFirstName.Text & _
txtLastName.Text & "<br/>")
Response.Write("Birthday " & _
Calendar1.SelectedDate)
Wizard1.Visible = False
End Sub
End Class
|