tutorialspoint.com"EndSubPrivateSubButton1_Click(senderAsObject,eAsEventArgs)_HandlesButton1.ClickClipboard.SetDataObject(RichTextBox1