Re: 滑鼠的click事件

看板Visual_Basic作者 (矇面加菲獅)時間18年前 (2007/03/22 06:40), 編輯推噓0(000)
留言0則, 0人參與, 最新討論串2/2 (看更多)
※ 引述《hiphoptomo (tomo)》之銘言: : 請問各位 : 我現在寫的是 123.aspx.vb : 我想利用web form 裡面有滑鼠的click來產生事件 : 例如: 像是把滑鼠移到textbox中點一下,旁邊的label內容值改變 (click觸發) : 但是我真的不知道該怎麼寫?? : ------------------------------- : Public Class WebForm1 : Inherits System.Web.UI.Page (最最前頭的宣告,不過要是用click,需要改哪邊嗎??) : 那我應該把這樣觸發事件放在哪個物件下面寫呢?? textbox裡頭 or 另外的一個副函式?? : 請各位大大幫幫忙....謝謝 TextBox 好像沒有提供 click 事件,所以要自己加入 javascript 或 vbscript... Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) _ Handles Me.Load Dim sc As String 'javascript 範例 sc = "javascript:" sc &= "document.getElementById('" & Label1.ClientID & "').innerText" sc &= "=new Date();" TextBox1.Attributes.Add("onclick", sc) 'vbscript 範例 sc = "vbscript:" sc &= "document.getElementById('" & label1.ClientID & "').innerText" sc &= "=now()" TextBox2.Attributes.Add("onclick", sc) End Sub 輸出的 html 原始碼就是 <input name="TextBox1" type="text" id="TextBox1" onclick="javascript:document.getElementById('Label1').innerText=new Date();" /> <input name="TextBox2" type="text" id="TextBox2" onclick="vbscript:document.getElementById('Label2').innerText=now()" /> -- ▃▅▇▆▄ ▆▂▃ ` 逝去感如何能留住,半點遺留殊不易,██▅▇▄▃ ▇▃▂" . █████████▃i ▁▄▇ 更多悽悽慘慘的遭遇………██▆▃ █▅▆▃ˍ▄* ▂█▄▇▅▂. 我不知道,王~八~蛋~~! ▂▆███ █▄▃ 。fumizuki。Check。 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 123.194.224.174
文章代碼(AID): #160RHs_e (Visual_Basic)
討論串 (同標題文章)
本文引述了以下文章的的內容:
完整討論串 (本文為第 2 之 2 篇):
文章代碼(AID): #160RHs_e (Visual_Basic)