Satal Keto

    Public Class Clipboard
        ''' <summary>
        ''' This method deals with putting text into the clipboard
        ''' </summary>
        ''' <param name="textToCopy">The text to be put in the clipboard</param>
        ''' <remarks></remarks>
        Public Shared Sub copyToClipboard(ByVal textToCopy As String)
            System.Windows.Forms.Clipboard.SetDataObject(textToCopy, True)
        End Sub

        ''' <summary>
        ''' This method deals with getting text from the clipboard
        ''' </summary>
        ''' <returns>The text that is in the clipboard</returns>
        ''' <remarks>If there is no text in the clipboard then a zero length string is returned</remarks>
        Public Shared Function getTextFromClipboard() As String
            Dim rtn As String = ""

            If (System.Windows.Forms.Clipboard.GetDataObject().GetDataPresent(DataFormats.Text)) Then
                rtn = System.Windows.Forms.Clipboard.GetDataObject().GetData(DataFormats.Text).ToString()
            End If

            Return rtn
        End Function
    End Class