杨林职教园区的学校:哪位高手帮忙写一个VBScript特效

来源:百度文库 编辑:查人人中国名人网 时间:2024/05/08 14:17:58
我想让在<marquee></marquee>之间的文字在运动过程中随机不断变换颜色,哪位高手能帮忙写一下这个代码

用 定时器 实现, 比较容易的

参考 setTimeout, setInterval

<script language="vbscript">
dim pp
pp="你想要的文字"
pl=len(pp)
document.write "<marquee>"
for i=1 to pl
dd=mid(pp,i,1)
document.write "<font color=#" & rnd(255) & ">" & dd & "</font>"
next
document.write "</marquee>"
</script>