update_color.htm

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

HTM
49
字号
<html><head><title>动态改变字颜色和背景颜色</title><script LANGUAGE="VBScript">times=0filterA=1fonts=25sub window_OnLoad     call divTextchangeallend subsub divTextchangeall    call divTextchange    Window.SetTimeout"divTextchangeall",100end subsub divTextchange     select case(times)    case 1 	divText.style.backgroundcolor="#a598b3"	divText.style.color="blue"    case 2 	divText.style.backgroundcolor="lightyellow"    case 3      	divText.style.color="#234567"	divText.style.fontsize=65    case 4	divText.style.color="#cc3456"	divText.style.fontsize=65	divText.style.backgroundcolor="yellow"    end select         If times=4 Then       times=0    else        times=times+1    end if    end sub</script></head><body bgcolor="#C0C0C0"><div ID="divText"style="position:absolute;text-align:center;font-size:15;"><center><p>VBScript编程</p></center></div></div></body></html>

⌨️ 快捷键说明

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