ch06-02-04.aspx

来自「这是一个asp.net的全文教程.里面还有数据库的数据.对初学者有很大的帮助」· ASPX 代码 · 共 31 行

ASPX
31
字号
<%@ Page Language="VB" Debug = "True"%>
<Html>
<Head>
<Title>Ch06-02-04.aspx 调用程序的方法</Title>
<Script Language="VB" Runat = "Server">
	' 被调用的Sub程序
	Sub SubA(ByVal VarA As String)
		Response.Write("程序名称:Sub DynamicSub(ByVal VarA As Object)<BR>")
		Response.Write("输入的数据为:<B>" & VarA & "</B><P>")
	End Sub
	' 被调用的FunctionA程序
	Function FunctionA(ByVal VarA As String) As String
		Response.Write("程序名称:Function DisplayText()<BR>")
		Response.Write("输入的数据为:<B>" & VarA & "</B>")
	End Function
</Script>
</Head>
<Body>
<%
Dim strA As String
strA = "调用Sub程序必定要使用Call命令!"
' 使用Call命令调用 DynamicSub程序
Call SubA(strA)
' 不使用Call命令直接调用FunctionA程序
strA = "调用FunctionA程序可以不需要使用Call命令!"
' 使用Call命令调用FunctionA程序
FunctionA(strA)
%>
</Body>
</Html>

⌨️ 快捷键说明

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