4.htm

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

HTM
40
字号
<html>
<head>
<title>随机显示信息</title>
<script LANGUAGE="VBScript">
<!--
'强制变量说明
Option Explicit
'定义随机变量
dim i
'定义数组,存放点点滴滴的标语
dim tips(4)
'初始化数组
tips(0)="好好学习,天天向上"
tips(1)="尊师重教,此为人本"
tips(2)="十年树木,百年树人"
tips(3)="书翻百遍,其义自现"
tips(4)="海纳百川,有容乃大"
sub Button1_onclick()
    i=round(rnd(1)*4)
	Form1.text1.value=tips(i)
end sub
-->
</script>
</head>
<body bgcolor=Snow>
<form NAME="Form1">
<center>
<INPUT NAME="Button1" TYPE="BUTTON" VALUE="随机字符"><HR>
<INPUT NAME="Text1" TYPE="TEXT" value="" SIZE="20">
<p>好好学习,天天向上。
<br>尊师重教,此为人本。
<br>十年树木,百年树人。
<br>书翻百遍,其义自现.
<br>海纳百川,有容乃大。
</p>
</center>
</form>
</body>
</html>

⌨️ 快捷键说明

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