⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 文字由小到大排列.htm

📁 VBSCRIPT的源码,相信很多html程序员都会用到,这些源码小小变动一下,可以用在很多地方,尤其在DHTML中!
💻 HTM
字号:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN">
<HTML>
<HEAD>
<TITLE>文字由小到大排列</TITLE>
<SCRIPT LANGUAGE=VBScript>

Function fade(text,vR,vG,vB)
red=not vR
green=not vG
blue=not vB
wordamount=Len(Text)
For j=1 To wordamount 
        x=((j+1)\4)\2
        B=int((-Blue*J\2)+x)                   
       
Printa=Printa&  "<FONT size=" & B &">" & Mid(Text,j,1)& "</FONT>"
NEXT
fadeword.innerHTML=printa
end Function

sub window_onload()
    call fade("柳随风静静地看着他们到来。",true,false,false)
end sub

</SCRIPT>

</HEAD>
<BODY bgColor=#c0c0c0>
<P align=center>
<BR>
</P>
<DIV align=center id=fadeword style="COLOR: blue">
	<FONT size=0>V</FONT>
	<FONT size=1>B</FONT>
	<FONT size=1>s</FONT>
	<FONT size=2>c</FONT>
	<FONT size=2>r</FONT>
	<FONT size=3>i</FONT>
	<FONT size=4>p</FONT>
	<FONT size=5>t</FONT>
	<FONT size=5> </FONT>
</DIV>
<DIV 
	style="COLOR: #ff4678; FONT-FAMILY: cursive; FONT-SIZE: 20px; FONT-WEIGHT: bold; LEFT: 88%; POSITION: absolute; TEXT-ALIGN: center; TOP: 88%">
</DIV> 
</BODY>
</HTML>

⌨️ 快捷键说明

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