天天看點

第一次調試的源代碼

<HTML>

 <HEAD>

  <title>Vb4</title>

<script language="vbscript" runat="server">

Sub BtnOk_Click(sender As Object,  e As EventArgs)

Message.Text = "嗨!你在"& MyCalendar.SelectedDate.ToShortDateString()&"選擇了:"&bookcategory.SelectedItem.Text

end sub

</script>

  <meta name="GENERATOR" content="Microsoft Visual Studio .NET 7.1">

  <meta name="CODE_LANGUAGE" content="Visual Basic .NET 7.1">

  <meta name="vs_defaultClientScript" content="JavaScript">

 </HEAD>

 <body MS_POSITIONING="GridLayout">

  <form id="Form1" method="post" runat="server" action="vb4.aspx">

   姓名:

   <asp:TextBox id="Name" runat="server" />

   <asp:Calendar id="MyCalendar" runat="server" />分類:

   <asp:dropdownlist id="bookcategory" Runat="server">

    <asp:ListItem Value="SQL Server 2000 Transact-SQL程式設計">SQL Server 2000 Transact-SQL程式設計</asp:ListItem>

    <asp:ListItem Value="用ADO.Net開發Asp.Net資料庫程式">用ADO.Net開發Asp.Net資料庫程式</asp:ListItem>

   </asp:dropdownlist>

   <asp:button text="确認" id="BtnOk" runat="server" OnClick="BtnOk_Click" style="Z-INDEX: 101; LEFT: 88px; POSITION: absolute; TOP: 272px" />

   <asp:Label id="Message" runat="server" style="Z-INDEX: 102; LEFT: 240px; POSITION: absolute; TOP: 272px" />

  </form>

 </body>

</HTML>

 本文轉自 simeon2005 51CTO部落格,原文連結:http://blog.51cto.com/simeon/17539