📄 4-5.aspx

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

💻 ASPX

字号:

<%@ Page language="VB" %>
<HTML>
<TITLE>[例4-5]判断所输入的数字是奇数还是偶数</TITLE>
<%
	Dim num as Integer=Request.QueryString("TextBox1")
	if num mod 2 = 0 then
		lDisplay.Text=num & " 是" & "偶数"
	else
		lDisplay.Text=num & " 是" & "奇数"
        end if
%>
 <BODY> 
 <FORM id="Form1" method="GET" runat="server">	
	<asp:Label id="Label1" runat="server">请输入数字：</asp:Label>
	<asp:TextBox id="TextBox1"  runat="server"/>
	<asp:Button id="Button1"  Text="提交" runat="server"/><P>
	<asp:Label id="lDisplay" runat="server">请输入数字：</asp:Label>
 </FORM>
</BODY>
</HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -