defaultvb.aspx.vb

Telerik是很大的第三方软件制造商

Imports System
Imports Telerik.QuickStart
Imports Telerik.WebControls


Namespace Telerik.TabStripExamplesVB.Application.CvWizard
   
   '/ <summary>
   '/ Summary description for DefaultCS.
   '/ </summary>
   Public Class DefaultVB
      Inherits XhtmlPage
      Protected listTitle As System.Web.UI.WebControls.DropDownList
      Protected textFirstName As System.Web.UI.WebControls.TextBox
      Protected validatorFirstName As System.Web.UI.WebControls.RequiredFieldValidator
      Protected textSecondName As System.Web.UI.WebControls.TextBox
      Protected validatorSecondName As System.Web.UI.WebControls.RequiredFieldValidator
      Protected textEmail As System.Web.UI.WebControls.TextBox
      Protected validatorRegEmail As System.Web.UI.WebControls.RegularExpressionValidator
      Protected textStreetAddress As System.Web.UI.WebControls.TextBox
      Protected listMonth As System.Web.UI.WebControls.DropDownList
      Protected listDay As System.Web.UI.WebControls.DropDownList
      Protected listYear As System.Web.UI.WebControls.DropDownList
      Protected Requiredfieldvalidator1 As System.Web.UI.WebControls.RequiredFieldValidator
      Protected radioMartial As System.Web.UI.WebControls.RadioButtonList
      Protected checkTerms As System.Web.UI.WebControls.CheckBox
      Protected valSummary As System.Web.UI.WebControls.ValidationSummary
      Protected listEducationType As System.Web.UI.WebControls.DropDownList
      Protected textSchoolName As System.Web.UI.WebControls.TextBox
      Protected textSchoolAddress As System.Web.UI.WebControls.TextBox
      Protected listGraduationYear As System.Web.UI.WebControls.DropDownList
      Protected listMajor As System.Web.UI.WebControls.ListBox
      Protected listMinor As System.Web.UI.WebControls.ListBox
      Protected textCompanyName As System.Web.UI.WebControls.TextBox
      Protected textCompanyAddress As System.Web.UI.WebControls.TextBox
      Protected textContactPerson As System.Web.UI.WebControls.TextBox
      Protected textPosition As System.Web.UI.WebControls.TextBox
      Protected listStartDateMonth As System.Web.UI.WebControls.DropDownList
      Protected listStartDateYear As System.Web.UI.WebControls.DropDownList
      Protected listEndDateMonth As System.Web.UI.WebControls.DropDownList
      Protected listEndDateYear As System.Web.UI.WebControls.DropDownList
      Protected textResponsibilities As System.Web.UI.WebControls.TextBox
      Protected textProjects As System.Web.UI.WebControls.TextBox
      Protected RadMultiPage1 As Telerik.WebControls.RadMultiPage
      Protected WithEvents buttonNextPers As System.Web.UI.WebControls.Button
      Protected Page0 As Telerik.WebControls.PageView
      Protected WithEvents buttonNextEdu As System.Web.UI.WebControls.Button
      Protected Page1 As Telerik.WebControls.PageView
      Protected WithEvents buttonNextProf As System.Web.UI.WebControls.Button
      Protected Page2 As Telerik.WebControls.PageView
      Protected WithEvents buttonSubmit As System.Web.UI.WebControls.Button
      Protected Page3 As Telerik.WebControls.PageView
      Protected editorMotivation As System.Web.UI.WebControls.TextBox
      Protected labelTitle As System.Web.UI.WebControls.Label
      Protected labelFirstName As System.Web.UI.WebControls.Label
      Protected labelSecondName As System.Web.UI.WebControls.Label
      Protected labelStreetAddress As System.Web.UI.WebControls.Label
      Protected labelCountry As System.Web.UI.WebControls.Label
      Protected labelEmail As System.Web.UI.WebControls.Label
      Protected labelBirthday As System.Web.UI.WebControls.Label
      Protected labelNationality As System.Web.UI.WebControls.Label
      Protected labelMartial As System.Web.UI.WebControls.Label
      Protected labelEducationType As System.Web.UI.WebControls.Label
      Protected labelSchoolName As System.Web.UI.WebControls.Label
      Protected labelSchoolAddress As System.Web.UI.WebControls.Label
      Protected labelGraduationYear As System.Web.UI.WebControls.Label
      Protected labelMajors As System.Web.UI.WebControls.Label
      Protected labelMinors As System.Web.UI.WebControls.Label
      Protected labelCompanyName As System.Web.UI.WebControls.Label
      Protected labelCompanyAddress As System.Web.UI.WebControls.Label
      Protected labelContactPerson As System.Web.UI.WebControls.Label
      Protected labelPositionHeld As System.Web.UI.WebControls.Label
      Protected labelStartDate As System.Web.UI.WebControls.Label
      Protected labelEndDate As System.Web.UI.WebControls.Label
      Protected labelResponsibilities As System.Web.UI.WebControls.Label
      Protected labelProjects As System.Web.UI.WebControls.Label
      Protected labelMotivation As System.Web.UI.WebControls.Label
      Protected RadTabStrip1 As RadTabStrip
      
      
      Private Sub Page_Load(sender As Object, e As EventArgs) Handles MyBase.Load
      End Sub 'Page_Load
      Protected Overrides Sub OnInit(e As EventArgs)
         '
         ' CODEGEN: This call is required by the ASP.NET Web Form Designer.
         '
         InitializeComponent()
         MyBase.OnInit(e)
      End Sub 'OnInit
      
      
      '/ <summary>
      '/ Required method for Designer support - do not modify
      '/ the contents of this method with the code editor.
      '/ </summary>
      Private Sub InitializeComponent()
      End Sub 'InitializeComponent
      Private Sub buttonNextPers_Click(sender As Object, e As System.EventArgs) Handles buttonNextPers.Click
         RadTabStrip1.SelectedIndex = RadTabStrip1.SelectedIndex + 1
         RadTabStrip1.SelectedTab.Enabled = True
         RadMultiPage1.SelectedIndex = RadMultiPage1.SelectedIndex + 1
      End Sub 'buttonNextPers_Click
      
      
      Private Sub buttonNextEdu_Click(sender As Object, e As System.EventArgs) Handles buttonNextEdu.Click
         RadTabStrip1.SelectedIndex = RadTabStrip1.SelectedIndex + 1
         RadTabStrip1.SelectedTab.Enabled = True
         RadMultiPage1.SelectedIndex = RadMultiPage1.SelectedIndex + 1
      End Sub 'buttonNextEdu_Click
      
      
      Private Sub buttonNextProf_Click(sender As Object, e As System.EventArgs) Handles buttonNextProf.Click
         RadTabStrip1.SelectedIndex = RadTabStrip1.SelectedIndex + 1
         RadTabStrip1.SelectedTab.Enabled = True
         RadMultiPage1.SelectedIndex = RadMultiPage1.SelectedIndex + 1
      End Sub 'buttonNextProf_Click
      
      
      Private Sub buttonSubmit_Click(sender As Object, e As System.EventArgs) Handles buttonSubmit.Click
      End Sub 'buttonSubmit_Click
   End Class 'DefaultVB 
End Namespace 'Telerik.TabStripExamplesVB.Application.CvWizard