如果打开后没见到效果,请等待一会儿。 VBScript实现文字遮罩 脚本之家(jb51.net)提供各类编程源码、书籍教程、JavaScript/CSS特效代码以及常用软件下载等,做有质量的学习型源码下载站。提供各类编程源码、JavaScript/CSS特效代码以及常用软件下载等,做有质量的学习型源码下载站。 Option Explicit sub window_OnLoad() call myLightObject.filters.light(0).addambient(0,0,255,30) call myLightObject.filters.light(0).addcone(400,400,200,100,100,200,204,200,80,10) end sub sub document_onMouseMove() call myLightObject.filters.light(0).MoveLight(1,window.event.x,window.event.y,0,1) end sub [Ctrl+A 全选 注:如需引入外部Js需刷新才能执行]