文本框中循环移动的文字.htm

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

HTM
33 行
字号 
<html>
<body onLoad="scroll_text()" bgColor=peachpuff>

<form name=myform >
<input name=display size=50 value="我是一个大帅哥"  > 
</form>

<script LANGUAGE="VBScript"><!--
'根据屏幕解析决定走马灯文字前后之间中文空白个数 
if screen.width = 640 then
   spaces = 20
elseif screen.width = 800 then
   spaces = 25
else
   spaces = 32
end if
'产生 spaces 个中文全型空白
text = ""
for i = 1 to spaces
   text = text & "　"
next

text = text & "我是一个大帅哥"

Sub scroll_text()
    document.myform.display.value = text
    text = Mid(text,2) & Left(text,1)   '将 text最左边一个字调到最右边
    setTimeout "scroll_text()",500 	'每 0.5 秒卷动 1 个字
End Sub
-->
</script>
</body>
</html>

文本框中循环移动的文字.htm - 源码说明

本页面展示了「VBSCRIPT的源码,相信很多html程序员都会用到,这些源码小小变动一下,可以用在很多地方,尤其在DHTML中!」中的 文本框中循环移动的文字.htm 源码文件，采用 HTM 编程语言编写，共 33 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与VBScript相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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