再次聲明
Sub Page_Load(ByVal sender As Object
If Profile
NoCartlabel
Wizard
End If
If User
Wizard
Else
Wizard
End If
End Sub
代碼中的下一個過程是響應在第二步(遞送地址)中改變的復選框
Sub chkUseProfileAddress_CheckedChanged(ByVal sender As Object
If chkUseProfileAddress
txtName
txtAddress
txtCity
txtCounty
txtPostCode
txtCountry
End If
End Sub
NextButtonClick用於檢查用戶是否已經成功登錄
[
From:http://tw.wingwit.com/Article/program/net/201311/15645.html