grazie 1000000000000 ci sono riuscito!!!!!!! ho fatto come hai detto tu , ma prendendo il testo dagli appunti
posto il codice...magari può servire a qualcun'altro
codice:
 Dim appunti = Clipboard.GetText()
        Dim sArray() As String = Split(appunti, "-")
        TextBox1.Text = sArray(0)
        TextBox2.Text = sArray(1)
        TextBox3.Text = sArray(2)