web15.html
来自「javascript 的一些简单例子 主要面对初学者」· HTML 代码 · 共 38 行
HTML
38 行
<html>
<head>
<title> Tracking Procedures</title>
</head>
<body>
<H1>Tester page for vbs</H1>
<hr color="blue">
<input type="submit" name="btn1" value="click to test the code">
<script language="VBScript">
<!--
Sub btn1_OnClick
Dim message ,x
x=100
message="Sub btn1_OnClick"
MsgBox message,0,"Procedure Result"
message="Sub MySub"
mysub(message)
x=returncount(x)
message="function returned"+cstr(x)
MsgBox message,0,"procedure result"
End Sub
Sub mysub(msg)
MsgBox msg,0,"procedure result"
End Sub
Function returncount(num)
returncount=num+1
End Function
-->
</script>
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?