在线运行代码 - 菜鸟教程

<!DOCTYPE html>
<html>
<body>

<script type="text/vbscript">
Sub mysub()
  document.write("I was written by a sub procedure")
End Sub
document.write("I was written by the script<br>")
Call mysub()
</script>

</body>
</html>

源代码

动行结果