Of course when you open Notepad you must paste the clipboard using edit paste or shortcuts but this copies
the text from Text1 and paste it when using edit paste.

Code:
Private Sub Command1_Click()
    'clear the clipboard
    Clipboard.Clear
    'get text from a textbox
    Clipboard.SetText Text1.Text
End Sub