📄 ch06-02-08.aspx
字号:
<%@ Page Language="VB" Debug = "True"%>
<Html>
<Head>
<Title>Ch06-02-08.aspx VB.NET 变量的有效范围</Title>
<Script Language="VB" Runat = "Server">
' 声明全域变量 intA
Dim intA As Integer
Function FunctionA()
' 声明区域变量 intB
Dim intB As Integer = 5, intC As integer
Response.Write("区域变量 intB 的值为" & intB & "<BR>")
Response.Write("全域变量 intA 的值将会乘以区域变量 intB 的值<BR>")
intA = intA * intB
For intC = 1 to intB
' 声明块变量 strA
Dim strA As String
strA = "使用块变量 strA"
Response.Write(StrA & "<BR>")
Next
End Function
</Script>
</Head>
<Body>
<%
' 调用函数 FunctionA()
intA = 10
' 显示调用函数之前的全域变量 intA 的值
Response.Write("调用函数前，全域变量 intA 的值为" & intA & "<BR>")
FunctionA()
' 显示调用函数之后的全域变量 intA 的值
Response.Write("调用函数后，全域变量 intA 的值为" & intA & "<BR>")
%>
</H1>
</Body>
</Html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -