📄 word_shadow.htm
字号:
<HTML>
<SCRIPT LANGUAGE=VBScript>
i = 1
sub window_OnLoad
call Effect
end sub
sub Effect( )
S1.className = "s" & i
id = setTimeout("Effect( )",500)
if i = 4 then
i = 1
else
i = i + 1
end if
end sub
</SCRIPT>
<STYLE>
.s1 {Width:300;filter:Shadow(Color=#000000,Direction=180)}
.s2 {Width:300;filter:Shadow(Color=#000000,Direction=270)}
.s3 {Width:300;filter:Shadow(Color=#000000,Direction=0)}
.s4 {Width:300;filter:Shadow(Color=#000000,Direction=90)}
</STYLE>
<BODY BGCOLOR=LightYellow >
<CENTER>
<DIV ID=S1 CLASS=s1>
<FONT color=red SIZE=6>
<B><BR><BR>生活很现实<BR>爱情才会褪色</B></FONT></DIV><P>
</CENTER>
</HTML>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -