ex6vb.aspx

来自「这是该书上的所有源代码,不错」· ASPX 代码 · 共 49 行

ASPX
49
字号
<script Language="VB" runat="server">

   Sub Page_Load(sender As Object, e As EventArgs) 
      Anchor1.InnerHtml = "单击进入263.net"
      Anchor1.Href = "http://www.263.net/"

      Anchor2.InnerHtml = "单击打开一个新的页面进入搜狐"
      Anchor2.Href = "http://www.sohu.com/"
      Anchor2.Target = "_blank"
      Anchor2.Title = "sohu"
   End Sub
	  
  	Sub Button1_Click(Source As Object, E as EventArgs)
          Message1.InnerHtml = "您单击按钮1的时间是: " + DateTime.Now
       	End Sub
	Sub Button2_Click(Source As Object, E as EventArgs)
          Message2.InnerHtml = "您单击按钮2的时间是: " + DateTime.Now
       	End Sub
	

</script>

<Html>
<title>第六例  HtmlAnchor和HtmlButton控件使用</title>
<Body BgColor="White">
<H3>第六例  HtmlAnchor和HtmlButton控件使用<HR></H3>
<blockquote>

	<A id="Anchor1" runat="server"></A><P>
	<A id="Anchor2" runat="server"></A>

	<Form runat="server">
   	<button OnServerClick=" Button1_Click" runat=server>
               <b>按钮1:<span id="Message1" runat=server></span> </b> 
             </button>
	<P>
	<BR>		

   	 <button OnServerClick=" Button2_Click" runat=server>
               <b>按钮2:<span id="Message2" runat=server></span> </b> 
             </button>
	</Form>


</blockquote>
<HR></Body>
</Html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?