《ASP网络程序设计》课程教学资源（试卷习题）课后习题及参考答案3

课后习题及参考答案 2 除非调用子程序，否则子程序不会自动执行 函数与子程序的不同之处在于子程序不能传入参数 3 函数执行后会返回值， 子程序则不会。 )4 函数只能传入一个参数，传入两个以上的参数会发生分页错误。 )5. 除了用End Sub来结束子程序之外，也可以使用Exit Sub。 )6. VBScript也提供了许多内置函数，以供设计师使用。 )7 函数可以用来计算绝对值， )8. 用来计算平方的函数是Sqr0: )9. RndD0函数会产生10~100之间的随机数。 )10.可以用RndO函数得到随机数，但必须先用Randomize来声明使用 随机数，否则每次得到的随机数都会一样。 操作题 VBScript程序，如果是白天(6点至l8点之间)进入网页 就会显示“早安您好”，如果晚上就会显示“晚安”，如图4-39阳、图4-39b所 示。 设计一个网页，当上网者在输入框中输入姓名后，会显示含有用户姓 名的欢信息对话框，加图4-40a、图4-40h所示。1Ch04欢印.htm> 设计一个网页，以显示出今天是星期几，如图4-41所示。 4. 设计一个程序，在用户离开网页时会显示“玩得愉快吗”的对话框， 并且可让用户按下“是”、“否”按钮，如图4-42a、图4-42b所示。 提示：离开的事件名为“Window_onUnload”。 参考答案： 一、是非题 TETFTTFFFE 二、操作题 L.早安 if hour(now)>=6 and hour(now) 2

课后习题及参考答案 ( )1. 除非调用子程序，否则子程序不会自动执行。 ( )2. 函数与子程序的不同之处在于子程序不能传入参数。 ( )3. 函数执行后会返回值，子程序则不会。 ( )4. 函数只能传入一个参数，传入两个以上的参数会发生分页错误。 ( )5. 除了用 End Sub 来结束子程序之外，也可以使用 Exit Sub。 ( )6. VBScript 也提供了许多内置函数，以供设计师使用。 ( )7. IsNumeric() 函数可以用来计算绝对值。 ( )8. 用来计算平方的函数是 Sqr()。 ( )9. RndD() 函数会产生 10 ~ 100 之间的随机数。 ( )10. 可以用 Rnd() 函数得到随机数，但必须先用 Randomize 来声明使用 随机数，否则每次得到的随机数都会一样。 二、操作题 1. 设计一个 VBScript 程序，如果是白天（6 点至 18 点之间）进入网页 就会显示“早安您好”，如果晚上就会显示“晚安”，如图 4-39a、图 4-39b 所 示。 2. 设计一个网页，当上网者在输入框中输入姓名后，会显示含有用户姓 名的欢迎信息对话框，如图 4-40a、图 4-40b 所示。 3. 设计一个网页，以显示出今天是星期几，如图 4-41 所示。 4. 设计一个程序，在用户离开网页时会显示“玩得愉快吗”的对话框， 并且可让用户按下“是”、“否”按钮，如图 4-42a、图 4-42b 所示。 提示：离开的事件名为“Window_onUnload”。 参考答案： 一、是非题 T F T F T T F F F F 二、操作题 1. 早安 if hour(now) >=6 and hour(now) 2

欢迎 e="VBScript""> 3. 星期几 a-weekday(now) select case a case 1 a=*“星期日”1 case 2 a="”星期一“m case 3 a=“星期二” case 4 a=*“星期三” case 5 a=”“星期四” case 6 a="“星期五” case 7 a=”“星期六“ end select document.write“今天是"”&a 4. HEAD>离开 SUB WINDOW_ONUNLOAD A=MSGBOX("玩得愉快吗“”，vbYesNo+vbQuestion) IF A=VBNO THEN MSGBOX"“对不起，下次会改进

欢迎 msgbox ""你好""&inputbox(""请问贵姓？"") 3. 星期几 a=weekday(now) select case a case 1 a= ""星期日"" case 2 a= ""星期一"" case 3 a= ""星期二"" case 4 a= ""星期三"" case 5 a= ""星期四"" case 6 a= ""星期五"" case 7 a= ""星期六"" end select document.write ""今天是"" & a 4. 离开 <!- SUB WINDOW_ONUNLOAD A=MSGBOX(""玩得愉快吗"",vbYesNo+vbQuestion) IF A=VBNO THEN MSGBOX ""对不起，下次会改进

END IF END SUB

END IF END SUB ->