鼠标改变颜色.htm

来自「VBSCRIPT的源码,相信很多html程序员都会用到,这些源码小小变动一下,可」· HTM 代码 · 共 56 行

HTM

56 行

<html>
<head>
<META name=VI60_defaultClientScript content=VBScript>
<title>鼠标改变颜色</title>
<script LANGUAGE="VBScript">
i=0
A = Array("red","blue","green","purple","black","tan","yellow","lime","coral","palegreen","silver","gold","red")
flag=1
function flashfont()
   if flag=0 then
	if i=12 then 
       	   i=0
	end if
	document.all("flhfnt1").style.color=a(i)
	document.all("flhfnt2").style.color=a(i+1)
	nknow=window.settimeout("flashfont()",1000)
	i=i+1
	flashfont=i
   end if
end function
</script>
<SCRIPT ID=clientEventHandlersVBS LANGUAGE=vbscript>
<!--
Sub flhfnt1_onmouseout
     flag=1   
End Sub

Sub flhfnt1_onmouseover
    flag=0
    call flashfont()
End Sub
Sub flhfnt2_onmouseout
     flag=1   
End Sub
Sub flhfnt2_onmouseover
    flag=0
    call flashfont()
End Sub
-->
</SCRIPT>
</head>
<body onload="flashfont()" bgcolor="#C0C0C0">
<center>
<h3>鼠标放入文字边界内颜色动态变化</h3>
<h3>鼠标移开文字边界内颜色动态变化</h3><hr>
</center>
<center>
<p align=center>
<font id="flhfnt1" size =6>鼠标放入此处的效果</font>
<br><br>
<font id="flhfnt2" size =8>你好朋友！</font>
</p>
</center>
</body>
</html>

鼠标改变颜色.htm - 源码说明

本页面展示了「VBSCRIPT的源码,相信很多html程序员都会用到,这些源码小小变动一下,可以用在很多地方,尤其在DHTML中!」中的鼠标改变颜色.htm 源码文件，采用 HTM 编程语言编写，共 56 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

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

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?