例4－28.htm

来自「web课件并附有习题练习还有实例详细的讲解了WEB的各种开发过程是学习的好资料」· HTM 代码 · 共 40 行

HTM

40 行

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<!-- saved from url=(0047)http://192.168.6.19/jxyd/book/web0208/E4_28.htm -->
<HTML><HEAD><TITLE>Document对象属性示例</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<META content="MSHTML 6.00.2900.2722" name=GENERATOR></HEAD>
<BODY topMargin=50>
<SCRIPT language=VBScript>
Times=0
Sub window_onload()
  call BannerChange()
End Sub
Sub BannerChange()
  Select Case (Times)
  Case 0
    banner.style.backgroundcolor="cyan" 
    banner.style.color = "darkblue"
  Case 1
    banner.style.fontstyle = "italic"
    banner.style.color = "hotpink"
    banner.style.backgroundcolor="yellow"
  Case 2
    banner.style.color = "red"
    banner.style.backgroundcolor="black"
  Case 3
    banner.style.color = "white"
    banner.style.fontstyle = "normal"
    banner.style.backgroundcolor="cornflowerblue"
  End Select
  If Times = 3 Then 
    Times = 0
  Else
    Times = Times + 1
  End If
  window.SetTimeOut "BannerChange",1000
End Sub
</SCRIPT>

<CENTER><SPAN id=banner 
style="FONT-SIZE: 18px; COLOR: blue; FONT-FAMILY: '宋体'">&nbsp;热线栏目&nbsp;</SPAN></CENTER></BODY></HTML>

例4－28.htm - 源码说明

本页面展示了「web课件并附有习题练习还有实例详细的讲解了WEB的各种开发过程是学习的好资料」中的例4－28.htm 源码文件，采用 HTM 编程语言编写，共 40 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与Web开发相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?