源代码:
<!DOCTYPE html> <html> <head> <script type="text/vbscript"> Sub mySub() msgbox("This is a Sub procedure") End Sub </script> </head> <body> <script type="text/vbscript"> Call mySub() </script> <p>A Sub procedure does not return a result.</p> </body> </html>
运行结果：