2009-11-20 32 views

回答

5

聲明在用戶控件的事件,並有按鈕的Click事件提出來:

Public Class UserControl1 
    Public Event MyButtonClick As EventHandler(Of MyButtonClickEventArgs) 

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
    RaiseEvent MyButtonClick(Me, New MyButtonClickEventArgs("nobugz")) 
    End Sub 

    Public Class MyButtonClickEventArgs 
    Inherits EventArgs 
    Private mText As String 
    Public Sub New(ByVal text As String) 
     mText = text 
    End Sub 
    Public ReadOnly Property Text() As String 
     Get 
     Return mText 
     End Get 
    End Property 
    End Class 

End Class 

現在承載需要的用戶控件可以訂閱事件和更新文本框的形式:

Private Sub UserControl11_MyButtonClick(ByVal sender As System.Object, ByVal e As WindowsApplication1.UserControl1.MyButtonClickEventArgs) Handles UserControl11.MyButtonClick 
    TextBox1.Text = e.Text 
    End Sub 
0

而我如何從用戶控件發送字符串到表單?

我需要從用戶控件發送數據到thr表單並在文本框中讀取它。例如:

Private Sub UserControl11_MyButtonClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles UserControl11.MyButtonClick 
    TextBox1.Text = e.mystring 
End Sub 
相關問題