打开记事本，在Silverlight中粘贴文本

我想从Silverlight打开记事本，然后将一些文本粘贴到其中。我能够使用剪贴板方法将我想要的文本移动到剪贴板。然后我用shell打开记事本。最后一步是将剪贴板的内容粘贴到记事本中。这可以通过用户按Ctrl-V或编辑-粘贴来完成

然而，这是一个不令人满意的解决办法。我想自动完成最后一步，将剪贴板粘贴到记事本中

这是我的密码：

 System.Windows.Clipboard.SetText(l_StringBuilder.ToString)


                ' next open notepad
  OpenShell("notepad.exe")


  System.Windows.Clipboard.GetText() ‘ this does not work


    Private Sub OpenShell(p_Program As String)
        Try
            If (AutomationFactory.IsAvailable) Then
                Dim shell = AutomationFactory.CreateObject("Shell.Application")


                shell.ShellExecute(p_Program) 'Open notepad

            End If

        Catch ex As Exception
            MessageBox.Show(ex.ToString)

        End Try
    End Sub

---

我在另一个论坛上得到了答案。以下是它的链接：