网络应用与开发复习资料docx.docx

网络应用与开发复习资料docx.docx

《网络应用与开发复习资料docx.docx》由会员分享，可在线阅读，更多相关《网络应用与开发复习资料docx.docx（24页珍藏版）》请在冰点文库上搜索。

网络应用与开发复习资料docx

1_1:

用2个label控件、1个textbox控件、1个button控件制作一个简单网页，实现提交后,页面显示：

欢迎XXX（考生姓名）！

成功就是如此简单，赶快行动吧

各控件的属性名称及属性值

控件类别

控件

屈性名称

属性值

备注

Web控件

Label

Id

Label1

用于显示提示信息

Text

请输入您的姓名

ForeColor

#ooooco

蓝色

Label

Id

Label2

在用户单击“确定”按钮后显示欢迎信息

Text

空

Font.Size

Medium

ForeColor

#ooooco

蓝色

TextBox

Id

TextBoxl

用于输入考生姓名

Text

空

Button

Id

Buttonl

确定按钮

Text

确定

写出按钮事件代码：

（P3）

答案：

Aspx页面代码：

//www.w3.org/1999/xhtml">

Aspx.Vb页面后台按钮事件处理代码：

ProtectedSubButtonlClick（ByVaisenderAsSystem.Object,ByVaieAs

System.EventArgs）HandlesButtonl.Click

Label2.Text=〃欢迎〃&TextBoxl.Text&“！

成功就是如此简单,赶快行动吧。

EndSub

2-0：

声明一个全局变量，并在子程序或函数屮改写该全局变量的值，并赋值。

Aspx.Vb页面后台按钮事件处理代码

PublicPartialClass20

EndFunction

EndClass

2-1：

在窗体中添加1个按钮、1个文本框和1个标签框。

用if语句完成：

年龄小于30岁工资为

2000元、年龄大于等于30小于40岁工资为3000元、年龄大于等于40小于50岁工资为4000元、其他为5000元。

控件类别

控件

屈性名称

属性值

备注

Web控件

Label

Id

Label1

用于显示提示信息

Text

请输入您的年龄

Label

Id

Label2

在用户单击“确定”按钮后显示工资信息

Text

空

TextBox

Id

TextBox1

用于输入年龄

Text

空

Button

Id

Buttonl

确定按钮

Text

确定

写出按钮事件代码：

（P7）

答案：

Aspx页面代码：

//www.w3.org/1999/xhtml，z>

Aspx.Vb页面后台按钮事件处理代码：

ProtectedSubButtonl_Click（ByValsenderAsSystem.Object,ByVaieAsSystem.EventxArgs）HandlesButtonl.Click

DimsalaryAsInteger

DimageAsInteger

age=TextBoxl.Text

Ifage<30Then

salary=2000

salary=3000

salary二4000

Else

salary=5000

EndIf

Labe12.Text=〃您的工资是：

〃&salary

EndSub

2-2：

用if语句和dowhile语句计算10以内的累加和，写出代码和操作。

Aspx页面代码：

//www.w3.org/1999/xhtml">

Aspx.Vb页面后台按钮事件处理代码：

ProtectedSubButtonlClick（ByVaisenderAsSystem.Object,ByVaieAsSystem.EventArgs）HandlesButtonl.Click

Dimi,sum,kAsInteger

k=TextBoxl.Text

Ifk>10Then

Label1.Text二"请输入以内的数"

Else

sum=0

Fori=1TokStep2

sum=sum+i

Next

Label1.Text="奇数累加和是：

"&sum

EndIf

EndSub

2-3：

求两个数的和，求和程序用函数实现。

Aspx页面代码

//ww.w3.org/1999/xhtml/z>

无标题页

Aspx.Vb页面后台函数定义及按钮事件处理代码：

Functionmysum（ByVali,ByVaij）AsTnteger

mysum=i+j

EndFunction

ProtectedSubButtonlClick（ByVaisenderAsSystem.Object,ByVaieAsSystem.EventArgs）HandlesButtonl.Click

Dimopl,op2,summaryAsInteger

opl=TextBox1・Textop2=TextBox2.Textsummary=mysum（opl,op2）sum.Text=summary

EndSub

3-1：

将HTML标记转为HTMLServer控件，用户输入水平条的长度后，水平条的宽度随Z变化。

Aspx页面代码

//www.w3.oi'g/1999/xhtml">

>无标题页〈/ti11c>

Aspx.Vb页面后台按钮事件处理代码：

PublicmyhrAsSystem.Web.UI.HtmlControls.HtmlGenericControl

ProtectedSubPageLoad（ByVaisenderAsObject,ByVaieAsSystem.EventArgs）HandlesMe.Load

IfNotPage.IsPostBackThen

myhr.Style（"width"）="100%"

EndIf

EndSub

ProtectedSubSubmitl_ServerClick（ByVaisenderAsSystem.0bject,ByValeAs

System.EventArgs）HandlesSubmit1.ServerClick

myhr.Style（"width"）=CInt（txtlen.Value）

EndSub

3-2：

将填入文本框中信息，保存到指定的文本中。

Aspx页面代码

//www.w3.org/1999/xhtml>

无标题页

Aspx.Vb页面后台函数定义及按钮事件处理代码：

ProtectedSubButtonl_Click（ByValsenderAsSystem.Object,ByVaieAs

System.EventArgs）HandlesButtonl・Click

DimstrwriteobjAsSystem.TO.StreamWriter

Dimfile_name,contxtAsString

file_namc=Server・MapPath（filename.Text）contxt=filebody・Text

Try

strwriteobj=System.TO.File.CreateText（file_name）strwriteobj.writeline（contxt）stnvriteobj・Close（）

message.Text="成功的创建了文本文件"&filename.Text

CatchexAsException

message.Text二"文本文件创建失败"

EndTry

EndSub

4~1：

制作一个简单Web页面，验证Page对象的Init与Load事件触发的先后顺序及触发条件。

Aspx页面代码

〃www・w3.org/1999/xhtml">

>无标题页〈/ti11c>

Aspx.Vb页面后台函数定义及按钮事件处理代码：

DimvisitnumAsShort=0

ProtectedSubPageInit（ByVaisenderAsObject,ByVaieAsSystem.EventArgs）HandlesMe.Load

visitnum二visitnum+1

Txtlnit.Text=Txtlnit.Text&"触发时间为：

"&Now（）&"，触发次数二"&visitnum

EndSub

ProtectedSubPageLoad（ByVaisenderAsObject,ByVaieAsSystem.EventArgs）

HandlesMe.Load

visitnum二visitnum+1

TxtLoad.Text=Txtlnit.Text&"触发时间为：

"&Now（）&"，触发次数二"&

visitnum

EndSub

4-2：

利用Response.WriteFile方法向客户端浏览器输入信息。

Aspx页面代码

Aspx.Vb页面后台函数定义及按钮事件处理代码：

（1）创建一个文件名poem.txt的文件，输入内容时不要换行。

（2）在Page_Load事件代码如下：

ProtectedSubPage_Load（ByVaisenderAsObject,ByVaieAsSystem.EvcntArgs）Handies

Me.Load

ConstLINE_LENGTH=10

DimstrFilenameAsString

DimingbeginPosAsLong

DimiAsInteger

strFi1ename="poem.txt"

Response.Write（"〈center〉"）

Response.Write（，z

Fori=1To4

Response.Write（，z

z/）

Response.WriteFile（strFilename,ingbeginPos,LINELENGTH）

Response.Write（"

ingbeginPos+二LINE_LENGTH

Next

Response.Write（，，/，）

EndSub

4_3：

利用Request对象获取URL传递的变量值。

静态HTML文件如下：

（也即Aspx页面代码）：

请你设计代码，获取URL传递的传值。

//www.w3.org/1999/xhtml">

Aspx.Vb页面后台函数Pagejoad事件处理代码：

Response.Write（，z