随机显示的背景图片.htm

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

HTM
55 行
字号 
<HTML>
<HEAD>
<TITLE>
	随机显示的背景图片
</TITLE>
<Script LANGUAGE="VBScript">
dim str
Randomize
d = Rnd()*3
document.write "<center>"
If d<1 Then
   document.write "<img src='1.jpg'>"
	str="1.jpg"
ElseIf d<2 Then
   document.write "<img src='2.jpg'>"
	str="2.jpg"
Else 
   document.write "<img src='3.jpg'>"
	str="3.jpg"
End If
Randomize
d = Rnd()*3
If d<1 Then  
 document.bgColor="blue"
ElseIf d<2 Then
   document.bgColor="lime"
Else   
document.bgColor="pink"
End If
document.write "</center>"
</script>

<Script LANGUAGE="VBScript">
<!--
	sub Button1_onclick
		msgbox "现在显示的背景图片为：" & str
	end sub
-->
</Script>
</HEAD>
<BODY bgcolor=Snow>
<div>
<center>
<H2>多次刷新页面就能看到效果</H2>
<form Action="随机显示的背景图片.htm" Method="POST">
<INPUT NAME="Button1" TYPE="BUTTON" VALUE="图片信息">
<input TYPE="Submit" NAME="SEND" VALUE="刷新页面">

</form>
</center>
</div>

</BODY>
</HTML>

随机显示的背景图片.htm - 源码说明

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

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

⌨️ 快捷键说明

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