[習題]User Control #4，如何自訂 UC裡面的方法、事件(Event)？自訂事件參數

2011-01-26

11918
0
ASP.NET 4.0與 VS 2010
2015-02-02

摘要:[習題]User Control #4，如何自訂 UC裡面的方法、事件(Event)？自訂事件參數

本系列共有這些文章，請依序觀看：

[習題]User Control #1，控制UC的公開屬性(Public Property)（入門練習）

[習題]User Control #2，控制UC的公開屬性(Public Property)，範例下載

[習題]User Control #3，如何自訂 UC裡面的方法、事件(Event)？（入門練習）

老話一句，這是給書本「上集」的讀者作為課後補充，請您看完 第十一章之後再來閱讀。

Q: 如果要在上一篇文章，自己設定的「事件」裡面，

導入自己設定的參數 e，該怎麼作呢？

文章最後有範例下載，VB與C#兩種語法都提供給大家參考

(1) 延續上一篇文章的內容，

我們必須在使用者控制項（UC）的後置程式碼裡面，加入這個參數e 的自訂型態（名為mis2000lab_EventArgs）

檔名： WebUserControl_05_Event_OK.ascx

'*********************************
    '**  自訂EventArgs **
    Public Class mis2000lab_EventArgs
        Inherits EventArgs

        Private m_TestString As String = "UC裡面的預設值！"

        Public ReadOnly Property TestString() As String
            Get
                Return m_TestString
            End Get
        End Property

        Public Sub New(ByVal TestString As String)
            Me.m_TestString = TestString
        End Sub
    End Class

(2) 原本上一篇文章的範例，要小作修改如下

Public Delegate Sub EditRecordHandler(ByVal sender As Object, ByVal e As mis2000lab_EventArgs) '**第二個參數，修正過！**
Public Event mis2000lab_EditRecord As EditRecordHandler '--自訂事件 (1)

'=======================================================
    '== 委派兩個事件。 ==
    '==    如此一來，ASP.NET網頁引用這個UC的時候，就能使用這個UC的兩個事件。
    '=======================================================
    Public Delegate Sub EditRecordHandler(ByVal sender As Object, ByVal e As mis2000lab_EventArgs)   '**第二個參數，修正過！**
    Public Event mis2000lab_EditRecord As EditRecordHandler   '--自訂事件 (1)

    Public Delegate Sub FinishedEditRecordHandler(ByVal sender As Object, ByVal e As EventArgs)
    Public Event mis2000lab_FinishedEditRecord As FinishedEditRecordHandler   '--自訂事件 (2)


    Protected Overridable Sub OnEditRecord(ByVal e As mis2000lab_EventArgs)   '**第二個參數，修正過！**
       '--寫在 .aspx網頁上，被觸發的UC「方法(1)」！
        RaiseEvent mis2000lab_EditRecord(Me, e)   '--觸發此OnEditRecord「方法」，會執行 mis2000lab_EditRecord事件！
    End Sub

    Protected Overridable Sub OnFinishedEditRecord(ByVal e As EventArgs)
        '--寫在 .aspx網頁上，被觸發的UC「方法(2)」！
        RaiseEvent mis2000lab_FinishedEditRecord(Me, e)
    End Sub

不用怕，上面的寫法是固定。

您照著修改即可。

(3) 重點是GridView1_RowEditing事件，最後會調用 OnEditRecord這個方法

Protected Sub GridView1_RowEditing(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewEditEventArgs) Handles GridView1.RowEditing

        GridView1.EditIndex = e.NewEditIndex

        '**********************************
        Dim cre As New mis2000lab_EventArgs("UC裡面的 GridView1_RowEditing事件")

        OnEditRecord(cre)  '** 重點！！ **
    End Sub

=========================================================================

現在，回到 ASP.NET網頁（Default_05_Event_OK.aspx）

我們開始使用上面寫好的UC

HTML碼的部分就不再贅述了，前面三篇文章都講過。

直接介紹ASP.NET網頁（Default_05_Event_OK.aspx）的後置程式碼：

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        AddHandler mis2000GV.mis2000lab_EditRecord, AddressOf mis2000GV_mis2000lab_EditRecord
        AddHandler mis2000GV.mis2000lab_FinishedEditRecord, AddressOf mis2000GV_mis2000lab_FinishedEditRecord
    End Sub





    '===================================================
    '== 因為上面的 Page_Load已經進行註冊，所以這兩個事件不需要 Handles。
    '==  （只有在 VB語法）
    '===================================================
    Protected Sub mis2000GV_mis2000lab_EditRecord(ByVal sender As Object, ByVal e As VS2010_Book_Sample_User_Control_WebUserControl_05_Event_OK.mis2000lab_EventArgs)
        '*** 請特別注意這個事件的「第二個」參數！！
        '*** Class名稱是從 UC過來的。檔名 WebUserControl_05_Event_OK.ascx
        Response.Write(" UC的 mis2000lab_EditRecord事件 -- " & e.TestString)
    End Sub

    Protected Sub mis2000GV_mis2000lab_FinishedEditRecord(ByVal sender As Object, ByVal e As System.EventArgs)
        Response.Write(" UC的 mis2000lab_FinishedEditRecord事件 -- Bye! Bye!")
    End Sub

使用VB語法來撰寫比較簡單，我們可以在VS開發工具上，立即發現UC的兩個事件。

（也就是上面程式的最底下，那兩個事件）

這種宣告可以寫在「後置程式碼」裡面的 Page_Load()事件（如同上面的寫法）

另一種方法，

您也可以把上面 Page_Load()事件的程式取消，

改寫在 HTML的 UC標籤裡面，(這種宣告，也可以寫在HTML碼的「UC標籤」裡面。兩者任選其一即可。)

例如：

<mis2000lab:GridView1 runat="server" ID="mis2000GV"

OnFinishedEditRecord="事件A" OnEditRecord="事件B" />

您可以開始執行ASP.NET網頁（Default_05_Event_OK.aspx）並且觀看結果。

當您按下 UC裡面的 GridView「編輯」按鈕，就會回報給您一些訊息字串。

<範例下載>

UC_Event_MIS2000Lab.rar (VB與C#，兩種語法都有)

................................................................................................................................................

Sorry!! 我在這個範例裡面，有一些沒做好的地方。

為了讓讀者能明顯分辨，我刻意在事件名稱上，加上 mis2000lab_字樣。

通常，事件名稱會跟方法名稱類似。方法名稱會在事件名稱前面，加上 On....

例如：網頁裡面的UC標籤被命名為 ID=mis2000GV。 <mis2000lab:GridView1 runat="server" ID="mis2000GV" />

那麼他的事件名稱應該就是 mis2000GV_EditRecord(ByVal sender As Object, ByVal e As UC的 Class名稱.mis2000lab_EventArgs)

觸發這個事件的方法，則是 OnEditRecord

例如我們常用的 Button控制項，他的 Click事件通常是由 OnClick方法來觸發的。

在ASP.NET網頁（.aspx檔）的 HTML碼裡面常見到（使用C#的讀者應該會很熟悉）

<asp:Button ID="Button2" runat="server"
onclick="Button2_Click" Text="Button" />

http://msdn.microsoft.com/zh-tw/library/system.web.ui.webcontrols.button_methods%28v=VS.100%29.aspx

2012/8/24補充：感謝一位朋友的指正

如果委派的格式是

第一個引數是object sender

第二個引數是自訂型別

可以不必額外設計一個委派, 用.net 內建的 EventHandler<T>即可

但自訂型別記得要繼承自EventArgs 物件, 就可以不必額外寫委派了

=== 最後要打一下廣告 ==========================

1. 如果您覺得我的描述、寫作方式，符合您的胃口。

2. 如果您看完以後，知道我寫書、介紹一些控制項或是技術........不是「混過去」、「帶過去」而已，而是真真確確地蒐集 "有用的範例"，讓您學得更深入！

3. 如果您覺得：我出完書以後，還不定期地提供售後服務，提供補充教材......這樣的互動是 "良性"的，是值得鼓勵的。......已經推出兩百多篇補充範例了

4. 如果您（尤其是學生）真的想把基礎學好，而不是 "混"過這一門課就好、而不是寫個（畢業專題的）屍體出來交差（能畢業就好）.....那麼.......

請您購買下面的書籍，

東西多到您學不完

上 / 下兩集，兩本書的厚度（我蒐集的各種範例）將近兩千頁！！......絕對不會讓您失望

我將思想傳授他人，他人之所得，亦無損於我之所有；

猶如一人以我的燭火點燭，光亮與他同在，我卻不因此身處黑暗。----Thomas Jefferson

線上課程教學，遠距教學 (Web Form 約 51hr) https://dotblogs.com.tw/mis2000lab/2016/02/01/aspnet_online_learning_distance_education_VS2015

線上課程教學，遠距教學 (ASP.NET MVC 約 140hr) https://dotblogs.com.tw/mis2000lab/2018/08/14/ASPnet_MVC_Online_Learning_MIS2000Lab

寫信給我，不要私訊 -- mis2000lab (at) yahoo.com.tw 或 school (at) mis2000lab.net

(1) 第一天 ASP.NET MVC5 完整影片（5.5小時 / .NET 4.x版）免費試聽。影片 https://youtu.be/9spaHik87-A

(2) 第一天 ASP.NET Core MVC 完整影片（3小時 / .NET Core 6.0~8.0）免費試聽。影片 https://youtu.be/TSmwpT-Bx4I

[學員感言] mis2000lab課程評價 - ASP.NET MVC , WebForm 。 https://mis2000lab.medium.com/%E5%AD%B8%E5%93%A1%E6%84%9F%E8%A8%80-mis2000lab%E8%AA%B2%E7%A8%8B%E8%A9%95%E5%83%B9-asp-net-mvc-webform-77903ce9680b

ASP.NET遠距教學、線上課程（Web Form + MVC）。第一天課程， "完整" 試聽。

......... facebook社團 https://www.facebook.com/mis2000lab ......................

......... YouTube (ASP.NET) 線上教學影片 https://www.youtube.com/channel/UC6IPPf6tvsNG8zX3u1LddvA/

Blog文章 "附的範例" 無法下載，請看 https://dotblogs.com.tw/mis2000lab/2016/03/14/2008_2015_mis2000lab_sample_download

請看我們的「售後服務」範圍（嚴格認定）。

......................................................................................................................................................

ASP.NET MVC => .NET Core MVC 線上教學 ...... 第一天課程完整內容 "免費"讓您評估 / 試聽

[遠距教學、教學影片] ASP.NET (Web Form) 課程上線了！MIS2000Lab.主講事先錄好的影片，並非上課側錄！觀看時，有如「一對一」面對面講課。

回首頁

ASP.NET專題實務 WebForm + MVC線上教學影片 -- MIS2000Lab.

MIS2000 Lab.已推出20餘本電腦書，曾任資策會專任講師與微軟MVP。自.NET 1.x起，已出版15本ASP.NET (Web Form)書籍，也有遠距教學線上教程教學影片