<Serializable()> _[/size]
[size=2]Public Class myClass[/size]
[size=2]Public firstString As String [/size]
[size=2]Public secondString As String [/size]
[size=2]Public Sub New() [/size]
[size=2]End Sub Public [/size]
[size=2]Sub New(ByVal something As String, ByVal _ [/size]
[size=2]somethingElse As String) [/size]
[size=2]firstString = something [/size]
[size=2]secondString = somethingElse [/size]
[size=2]End Sub[/size]
[size=2]End Class[/size]
[size=2]
Private Sub copy_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles copy.Click
Dim myNewClass As New myClass(txtFirstTextBox.Text, _
txtSecondTextBox.Text)
Clipboard.SetDataObject(myNewClass)
End Sub