[習題]ASP.NET製作網頁版的[小]計算機 #2 -- Button_Click事件裡面的 參數 sender

摘要:[習題]ASP.NET製作網頁版的[小]計算機 #2 -- 事件裡面的 參數 sender




 

 

 

本文是由「[習題]ASP.NET製作網頁版的[小]計算機 #1 -- 使用 ViewState or Session」改進而來

建議您看過上一篇文章後,再繼續下去......

 

     

 

本範例修正的地方如下:

    第一,所有的「數字」按鈕,例如:0/1/2/3......都設定了 Button的「CommandArgument」屬性

    第二,這些「數字」按鈕的 Click事件,程式內容都雷同且重複。所以合併在同一個事件內完成。

 

這個範例順便介紹了後置程式碼的 "事件"中,例如 Button的 Click事件

為何裡面會有兩個參數?

    參數 sender是什麼意思?怎麼用呢?(本範例會有實作)

    至於參數 e,書本已經有解釋過,在此不再贅述。

    請自行參閱「 ASP.NET專題實務(上集)/ 松崗出版

 

如果您買的書,沒提到這些。

或是您對他們兩個參數也支支吾吾,說不清楚........這都很危險!!!都是有學 沒有懂!

 

 

 

本文範例,可以搭配書本「上集」的第十六章 狀態管理,一起學習。

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

 

HTML設計畫面,請參閱上一篇文章([習題]ASP.NET製作網頁版的[小]計算機 #1 -- 使用 ViewState or Session

 

原本的程式:

    '== 數 字 ============================================================
    '== 以下程式的重複性太高,可以濃縮在一起。請看下一個範例 Web_Calculator_sender.aspx。

    Protected Sub Button0_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button0.Click
        ViewState("cal_input") = ViewState("cal_input").ToString() & "0"
        TextBox1.Text = ViewState("cal_input").ToString()
    End Sub

    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        ViewState("cal_input") = ViewState("cal_input").ToString() & "1"
        TextBox1.Text = ViewState("cal_input").ToString()
    End Sub

    Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click
        ViewState("cal_input") = ViewState("cal_input").ToString() & "2"
        TextBox1.Text = ViewState("cal_input").ToString()
    End Sub

    Protected Sub Button3_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button3.Click
        ViewState("cal_input") = ViewState("cal_input").ToString() & "3"
        TextBox1.Text = ViewState("cal_input").ToString()
    End Sub

    Protected Sub Button4_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button4.Click
        ViewState("cal_input") = ViewState("cal_input").ToString() & "4"
        TextBox1.Text = ViewState("cal_input").ToString()
    End Sub

註解:後續的數字按鈕,事件內的程式都類似,以此類推

 

 

修改後的 VB程式:

要讓畫面上,所有的「數字」按鈕指向同一個事件,請注意以下的「Handles」關鍵字

    '== 數 字 ============================================================
    '== 以下程式的重複性太高,可以濃縮在一起。請看下一個範例 Web_Calculator_sender.aspx。

    Protected Sub Button_Click(ByVal sender As Object, ByVal e As System.EventArgs) _
    Handles Button0.Click, Button1.Click, Button2.Click, Button3.Click, Button4.Click, Button5.Click, Button6.Click, Button7.Click, Button8.Click, Button9.Click
        '*** 上面這一列(Handles)是VB語法的重點,代表所有的數字按鈕,都會觸發同一個 Button_click事件!!

        Dim btn As Button = CType(sender, Button)

        ViewState("cal_input") = ViewState("cal_input").ToString() & btn.CommandArgument
        TextBox1.Text = ViewState("cal_input").ToString()
    End Sub

 


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

修改後的 C#程式:

    //== 數 字 ============================================================
    //== 上一個範例 Web_Calculator.aspx。以下程式的重複性太高,可以濃縮在一起。

    protected void Button_Click(object sender, EventArgs e)
    {
        Button btn = (Button)sender;

        ViewState["cal_input"] = ViewState["cal_input"].ToString() + btn.CommandArgument;
        TextBox1.Text = ViewState["cal_input"].ToString();
    }

 

如果是 C#的用戶,您可以在 HTML設計畫面( .aspx檔)裡面,

將每一個數字按鈕,都指向同一個事件即可:

        <asp:Button ID="Button7" runat="server" Font-Bold="True" Font-Size="Medium" Text="7"
            CommandArgument="7" OnClick="Button_Click" />

        &nbsp;<asp:Button ID="Button8" runat="server" Font-Bold="True" Font-Size="Medium"
            Text="8" CommandArgument="8" OnClick="Button_Click" />

        &nbsp;<asp:Button ID="Button9" runat="server" Font-Bold="True" Font-Size="Medium"
            Text="9" CommandArgument="9" OnClick="Button_Click" />

 

 

本文範例,可以搭配書本「上集」的第十六章 狀態管理,一起學習。

 

相關文章 ---- 

Button_Click事件裡面的 參數 sender,以清單控制項為例

 

 

 

 

 

 

 

 

 

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

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

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

線上課程教學,遠距教學 (ASP.NET MVC 約 135hr)  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.主講   事先錄好的影片,並非上課側錄!   觀看時,有如「一對一」面對面講課