例3-5.htm

来自「发广告高投入还给他呵呵语而言一天我认同感而热听音乐一同意同意一」· HTM 代码 · 共 23 行

HTM

23 行

<html>
<head>
<script language="vbscript">
 sub xm()  '定义xm过程，无参数。注：无参数也必须加上()
   dim name
   name=prompt("请输入您的姓名")
   document.write("欢迎您，" & name & "!" & "<p>")
 end sub
 sub pf(a) '定义pf过程，参数为a
   dim s
   s=a*a
   document.write("A的平方=" & s)
 end sub
</script>
</head>
<body>
<script language="vbscript">
 call xm      '调用xm过程
 a1=prompt("请输入A值：")
 call pf(a1)  '调用pf过程，并将a1的值传递给a
</script>
</body>
</html>

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?

例3-5.htm

例3-5.htm - 源码说明

⌨️ 快捷键说明