2014-02-21 52 views

回答

0

以下的代碼你

窗口形式有2個的RichTextBox和2標籤,當你點擊RichTextBox2當時還解僱RichTextBox1_Click用下面的代碼

Private Sub RichTextBox1_Click(sender As System.Object, e As System.EventArgs) Handles RichTextBox1.Click 
    lblforRichTextBox1.Text = "Fired RichTextBox1 " & System.DateTime.Now() 
End Sub 

Private Sub RichTextBox2_Click(sender As Object, e As System.EventArgs) Handles RichTextBox2.Click 
    lblForRichTextBox2.Text = "Fired RichTextBox2 " & System.DateTime.Now() 
    RichTextBox1_Click(Nothing, Nothing) 
End Sub 
幫助
相關問題