鼠标悬浮出现不同的颜色
代码放在<body>.......</body>中
<p onMouseMove="hello()">将鼠标移到这里看看效果<p><p><p><p></p> <script language="VBScript"> sub hello document.fgColor=int(256*256*256*rnd) end sub </script>