📄 3-16.aspx

📁 程序源代码分成两个部分： &#61557 一部分是用记事本或EditPlus编写的

💻 ASPX

字号:

<%@page LANGUAGE = "vb" AutoEventWireup="false"%>
<script language="vb" runat ="server">
class TestMethod
	Function square(ByVal x As Integer) As Integer
		return x * x
	End Function
	Function square(ByVal x As Double) As Double
		return x * x
	End Function
	Function square(ByVal x As Decimal) As Decimal
		return x * x
	End Function
End Class
</script>
<HTML>
<HEAD>
	<title>Test Property</title>
</HEAD>
<BODY>
<TABLE width="100%" bordercolor="blue" border="1">
<TR height=25 bgcolor="blue" >
<TD align="center"><font color="white">程序输出结果</font></TD></TR>
<TR bgcolor="white"><TD>
<%      
        Dim t As new TestMethod()	
      	Response.Write("The squre is " & t.square(10) & "," & t.square(12.34) & "," & t.square(123.456d))
%>
</TD>
</TR>
</TABLE>
</BODY>
</HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -