上升的文字.htm

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

HTM
31
字号
<HTML>
<title>
	向上移动的文字
</title>
<HEAD>
<META NAME="GENERATOR"Content="Microsoft Visual Studio 6.0">
<HEAD>
<TITLE>Dynamic Positioning</TITLE>
<script LANGUAGE="VBScript">

Sub moveText
  moveDiv1
SetTimeout "moveText()", 40
  End Sub

Sub moveDiv1
  div1.style.posTop = div1.style.posTop - 2
  if div1.style.posTop < -80 then
     div1.style.posTop = screen.height
  end if
End Sub
</script>
<body onLoad="moveText()">
<div id="div1" style="position: absolute; color: blue; font-size: 60px">
<center>
  向上移动的文字
<center>
</div>
</body>
</HTML>

⌨️ 快捷键说明

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