问题描述
请大侠们帮帮忙! 谢谢
解决方案
解决方案二:
打开后看到一堆乱码,你贴一下CODE
解决方案三:
<%@PageLanguage="VB"AutoEventWireup="false"CodeFile="Default.aspx.vb"Inherits="_Default"%><!DOCTYPEhtmlPUBLIC"-//W3C//DTDXHTML1.0Transitional//EN""http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><htmlxmlns="http://www.w3.org/1999/xhtml"><headrunat="server"><title>无标题页</title></head><body><formid="form1"runat="server"><div><asp:PanelID="Step1"runat="server"BackColor="green"Height="194px"Width="549px">您的姓名:<asp:TextBoxID="txtname"runat="server"></asp:TextBox><p>您所从事的职业:<br><asp:RadioButtonListID="radWork"runat="server"RepeatColumns="3"RepeatDirection="Horizontal"><asp:ListItem>教师</asp:ListItem><asp:ListItem>工程师</asp:ListItem><asp:ListItem>医生</asp:ListItem><asp:ListItem>自由职业</asp:ListItem><asp:ListItem>公务员</asp:ListItem><asp:ListItem>其他</asp:ListItem></asp:RadioButtonList><asp:ButtonID="submit1"Text="下一步"runat="server"Height="37px"Width="105px"OnClick="submit1_Click"/></asp:Panel><asp:PanelID="Step2"runat="server"Height="175px"Width="545px"BackColor="lightblue">您喜欢的运动:<br><asp:CheckBoxListID="Sport"runat="server"RepeatDirection="Horizontal"><asp:ListItem>足球</asp:ListItem><asp:ListItem>长跑</asp:ListItem><asp:ListItem>健美</asp:ListItem><asp:ListItem>其他</asp:ListItem></asp:CheckBoxList>您喜欢的音乐:<br><asp:CheckBoxListID="Music"runat="server"RepeatDirection="Horizontal"><asp:ListItem>流行音乐</asp:ListItem><asp:ListItem>古典音乐</asp:ListItem><asp:ListItem>摇滚音乐</asp:ListItem><asp:ListItem>其他音乐</asp:ListItem></asp:CheckBoxList><asp:ButtonID="submit2"runat="server"Height="33px"Text="下一步"Width="106px"OnClick="submit2_Click"/></asp:Panel><asp:PanelID="Step3"runat="server"Height="237px"Width="544px"BackColor="lightgreen">您最喜欢的书的类别:<br><asp:ListBoxID="lstBook"runat="server"><asp:ListItem>科学类</asp:ListItem><asp:ListItem>文学类</asp:ListItem><asp:ListItem>历史类</asp:ListItem><asp:ListItem>教育类</asp:ListItem></asp:ListBox><p>您喜欢的付款方式:<br><asp:DropDownListID="ddPay"runat="server"><asp:ListItem>网上支付</asp:ListItem><asp:ListItem>邮寄</asp:ListItem><asp:ListItem>电汇</asp:ListItem></asp:DropDownList><p><asp:ButtonID="submit3"runat="server"Text="提交"Height="37px"Width="107px"OnClick="submit3_Click"/></asp:Panel><asp:LabelID="Label1"runat="server"Text="Label"EnableTheming="True"></asp:Label></div></form></body></html>vb代码:PartialClass_DefaultInheritsSystem.Web.UI.PageProtectedSubPage_Load(ByValsenderAsObject,ByValeAsSystem.EventArgs)HandlesMe.LoadIfNotPage.IsPostBackThenStep1.Visible=TrueStep2.Visible=FalseStep3.Visible=FalseLabel1.Visible=FalseEndIfEndSubProtectedSubsubmit1_Click(ByValsenderAsObject,ByValeAsSystem.EventArgs)Handlessubmit1.ClickDimresultAsStringresult="您的姓名:"&txtname.Text&"<br>"result=result&"您的职业:"&radWork.SelectedItem.TextLabel1.Text=resultLabel1.Visible=FalseStep1.Visible=FalseStep2.Visible=TrueStep3.Visible=FalseEndSubProtectedSubsubmit2_Click(ByValsenderAsObject,ByValeAsSystem.EventArgs)Handlessubmit2.ClickDimresultAsStringDimiAsIntegerresult=Label1.Textresult=result&"<br>您喜欢的运动:"IfSport.SelectedIndex>=0ThenFori=0ToSport.Items.Count-1IfSport.Items(i).SelectedThenresult=result&Sport.Items(i).Text&"、"EndIfNextEndIfIfMusic.SelectedIndex>=0Thenresult=result&"<br>您喜欢的音乐:"Fori=0ToMusic.Items.Count-1IfMusic.Items(i).SelectedThenresult=result&Music.Items(i).Text&"、"EndIfNextEndIfStep1.Visible=FalseStep2.Visible=FalseStep3.Visible=TrueLabel1.Text=resultEndSubProtectedSubsubmit3_Click(ByValsenderAsObject,ByValeAsSystem.EventArgs)Handlessubmit3.ClickDimresultAsStringresult=Label1.Textresult=result&"<br>您喜欢的书的类别:"&lstBook.SelectedItem.Textresult=result&"<br>您最喜欢的付款方式:"&ddPay.SelectedItem.Text'result=result&"</Ul>"Label1.Text=resultLabel1.Visible=TrueEndSubEndClass
解决方案四:
Label1.Text=""