动态改变字体颜色.htm

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

HTM
30
字号
<HTML>
<HEAD>
<META NAME="GENERATOR"Content="Microsoft Visual Studio 6.0">
<TITLE>
	改变字体颜色
</TITLE>
<script LANGUAGE="VBScript">
Option Explicit
Dim radians 
Sub timeout
Dim color
radians = radians + 2 * 3.141529/100
color = 127 * Sin(radians) + 127
div1.style.color = color
SetTimeout "timeout()", 100
End Sub
</script>
</HEAD>
<style type="text/css">
#div1 { font-size: 40pt; font-weight: bold }
</style>
<body onload="timeout()">
<center>
<div id="div1">
动态改变字体颜色
</div>
</center>
</body>
</HTML>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?