日韩无码专区无码一级三级片|91人人爱网站中日韩无码电影|厨房大战丰满熟妇|AV高清无码在线免费观看|另类AV日韩少妇熟女|中文日本大黄一级黄色片|色情在线视频免费|亚洲成人特黄a片|黄片wwwav色图欧美|欧亚乱色一区二区三区

RELATEED CONSULTING
相關(guān)咨詢
選擇下列產(chǎn)品馬上在線溝通
服務(wù)時間：8:30-17:00
你可能遇到了下面的問題
關(guān)閉右側(cè)工具欄

新聞中心

這里有您想知道的互聯(lián)網(wǎng)營銷解決方案
快捷簡單的VB.NET編程事件方法介紹

看一個關(guān)于VB.NET編程的例子，在這里呢我使用另一種方法來說明當你建立和注冊一個事件處理程序時到底發(fā)生了什么事情。一旦你明白事情是怎么回事，你也許會感激使用了更簡潔的語法實現(xiàn)了相同的目標，一起來看看吧：

成都創(chuàng)新互聯(lián)專注于企業(yè)營銷型網(wǎng)站、網(wǎng)站重做改版、長白網(wǎng)站定制設(shè)計、自適應品牌網(wǎng)站建設(shè)、H5網(wǎng)站設(shè)計、商城網(wǎng)站建設(shè)、集團公司官網(wǎng)建設(shè)、成都外貿(mào)網(wǎng)站建設(shè)、高端網(wǎng)站制作、響應式網(wǎng)頁設(shè)計等建站業(yè)務(wù)，價格優(yōu)惠性價比高，為長白等各大城市提供網(wǎng)站開發(fā)制作服務(wù)。

 
 
 
      
  
  
  1. '建立銀行帳號對象  
    2.   
  
  
  2. Dim account1 As New BankAccount()  
    3.   
  
  
  3. '注冊事件處理程序  
    4.   
  
  
  4. AddHandler account1.LargeWithdraw, AddressOf AccountHandlers.LogWithdraw  
    5.   
  
  
  5. AddHandler account1.LargeWithdraw, AddressOf AccountHandlers.GetApproval  
    6.

因為AddHandler語句期待一個委托對象作為第二個參數(shù)，你能使用速記語法--AddressOf操作符后緊跟目標處理方法的名字。當Visual Basic .NET編譯器看到該語法時，它接著產(chǎn)生額外的代碼來建立作為事件處理程序服務(wù)的委托對象。VB.NET編程語言中的AddHandler語句的補充是RemoveHandler語句。RemoveHandler需要的參數(shù)與AddHandler的相同，它的效果相反。它通過事件源調(diào)用remove_LargeWithdraw方法從已注冊的處理方法列表中刪除目標處理方法。

 
 
 
      
  
  
  1. Dim account1 As New BankAccount()  
    2.   
  
  
  2. '注冊事件處理程序  
    3.   
  
  
  3. AddHandler account1.LargeWithdraw, AddressOf AccountHandlers.LogWithdraw  
    4.   
  
  
  4. '刪除事件處理程序注冊  
    5.   
  
  
  5. RemoveHandler account1.LargeWithdraw, AddressOf AccountHandlers.LogWithdraw   
    6.

你已經(jīng)看到了實現(xiàn)使用事件的回調(diào)設(shè)計需要的所有步驟了。代碼顯示了一個完整的應用程序，在該程序中已經(jīng)注冊了兩個事件處理程序從BankAccount對象的LargeWithdraw事件接收回調(diào)通知。

 
 
 
      
  
  
  1. Delegate Sub LargeWithdrawHandler(ByVal Amount As Decimal)  
    2.   
  
  
  2. Class BankAccount  
    3.   
  
  
  3. Public Event LargeWithdraw As LargeWithdrawHandler  
    4.   
  
  
  4. Sub Withdraw(ByVal Amount As Decimal)  
    5.   
  
  
  5. '如果需要的話就發(fā)送通知  
    6.   
  
  
  6. If (Amount > 5000) Then  
    7.   
  
  
  7. RaiseEvent LargeWithdraw(Amount)  
    8.   
  
  
  8. End If  
    9.   
  
  
  9. '執(zhí)行撤消  
    10.   
  
  
  10. End Sub  
    11.   
  
  
  11. End Class  
    12.   
  
  
  12. Class AccountHandlers  
    13.   
  
  
  13. Shared Sub LogWithdraw(ByVal Amount As Decimal)  
    14.   
  
  
  14. '把撤消信息寫入日志文件  
    15.   
  
  
  15. End Sub  
    16.   
  
  
  16. Shared Sub GetApproval(ByVal Amount As Decimal)  
    17.   
  
  
  17. '阻塞直到管理者批準  
    18.   
  
  
  18. End Sub  
    19.   
  
  
  19. End Class  
    20.   
  
  
  20. Module MyApp  
    21.   
  
  
  21. Sub Main()  
    22.   
  
  
  22. '建立銀行帳號對象  
    23.   
  
  
  23. Dim account1 As New BankAccount()  
    24.   
  
  
  24. '注冊事件處理程序  
    25.   
  
  
  25. AddHandler account1.LargeWithdraw, _  
    26.   
  
  
  26. AddressOf AccountHandlers.LogWithdraw  
    27.   
  
  
  27. AddHandler account1.LargeWithdraw, _  
    28.   
  
  
  28. AddressOf AccountHandlers.GetApproval  
    29.   
  
  
  29. '做一些觸發(fā)回調(diào)的事情  
    30.   
  
  
  30. account1.Withdraw(5001)  
    31.   
  
  
  31. End Sub  
    32.   
  
  
  32. End Module   
    33.

結(jié)論

盡管使用事件的動機和一些語法與早期版本的VB.NET編程相比仍然沒有改變，但是你不得不承認情況有很大不同了。你能看到，你對如何響應事件的控制力比以前大多了。如果你將使用委托編程，這就很實際了。

【編輯推薦】

  1. 講述VB.NET實現(xiàn)拖動圖片
  2. 簡單講解VB.NET ListBox控件
  3. 淺析VB.NET語言與VB語言對比
  4. 你是否了解VB.NET集成開發(fā)環(huán)境
  5. 深入分析VB.NET條件語句中的兩類

新聞名稱：快捷簡單的VB.NET編程事件方法介紹
網(wǎng)站地址：http://www.5511xx.com/article/cohhheh.html