📄 exercise2.aspx
字号:
<HTML>
<HEAD>
<script language="VB" runat="server">
Sub btAdd_Click(Sender As Object, E As EventArgs)
lblMessage.Text = "The answer is: " & Cint(tbNumber1.Text) + Cint(tbNumber2.Text)
End Sub
Sub btSubtract_Click(Sender As Object, E As EventArgs)
lblMessage.Text = "The answer is: " & Cint(tbNumber1.Text) - Cint(tbNumber2.Text)
End Sub
Sub btMultiply_Click(Sender As Object, E As EventArgs)
lblMessage.Text = "The answer is: " & Cint(tbNumber1.Text) * Cint(tbNumber2.Text)
End Sub
Sub btDivide_Click(Sender As Object, E As EventArgs)
lblMessage.Text = "The answer is: " & Cint(tbNumber1.Text) / Cint(tbNumber2.Text)
End Sub
</script>
</HEAD>
<BODY bgcolor="#CCCCCC">
<font size="5">Sam's Teach Yourself ASP.NET in 21 Days: Day 2, Exercise 2</font><hr><p>
<form runat="server">
Number 1: <asp:textbox id="tbNumber1" runat=server/><br>
Number 2: <asp:textbox id="tbNumber2" runat=server/><p>
<asp:button id="btAdd" Text=" + " OnClick="btAdd_Click" runat=server/>
<asp:button id="btSubtract" Text=" - " OnClick="btSubtract_Click" runat=server/>
<asp:button id="btMultiply" Text=" * " OnClick="btMultiply_Click" runat=server/>
<asp:button id="btDivide" Text=" / " OnClick="btDivide_Click" runat=server/><p>
<asp:label id="lblMessage" font-size="20pt" runat=server/>
</form>
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -