江西省卫计委副主任:哪位高手帮忙写一个VBScript特效

来源:百度文库 编辑:杭州交通信息网 时间:2024/04/28 18:51:44
我想让在<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>