如何分配在VB.NET

Question

值委託函數我有另一個類，如下所示

Public Class Connect 

Public Delegate Function RP_ClientConnect(ByVal hwndClient As IntPtr, _ 
             ByVal deviceID As Short, _ 
             ByVal protocol As String) As Short 

我有一個功能，其中我試圖將值賦給了一個委託函數委託功能。但我不確定如何去做。我試過但無法解決它。

我想在委託函數中傳遞deviceID和協議的新值。

Private Sub btnConnect_Click(sender As Object, e As EventArgs) Handles btnConnect.Click 

Dim myNewClientConnect As Connect 
Dim iDNumber as Integer= 10 
Dim prot as String = "CAN" 
myNewClientConnect(Nothing, iDNumber, prot) 

End Sub 

我是新來vb.Net並期待從你的人得到一些建議。

Answer 1

你沒有調用委託，你調用了你的類的構造函數。

首先，創建具有相同簽名的委託的方法：

Private Function MyDelegate(ByVal hwndClient As IntPtr, _ 
          ByVal deviceID As Short, _ 
          ByVal protocol As String) As Short 
    'Do something. 
End Function 

然後定義通過調用創建委託的實例，並調用與代表相關聯的方法的方法內置的調用方法。

Private Sub btnConnect_Click(sender As Object, e As EventArgs) Handles btnConnect.Click 
    ' Create an instance of the delegate. 
    Dim d As RP_ClientConnect = AddressOf MyDelegate 
    ' Call the method. 
    d.Invoke(Nothing, iDNumber, prot) 
End Sub 

您可以參考這個MSDN page瞭解更多詳情。