anyone know?
Printable View
anyone know?
Use Clipboard functions like this:
Hope this helps you.Code:
Clipboard.GetText 'Gets the text saved to clipboard
Clipboard.SetText 'Sets text to save to clipboard
'Below are to Functions you can use
Public Function Paste() As String
Dim sTemp As String 'Create a Temp String
sTemp = Clipboard.GetText 'Temp String = Clipboard Text
Paste = sTemp 'Paste Function = Temp String
End Function
Public Function Copy(sString As String)
Clipboard.SetText sString 'Set Clipboard Text to sString
End Function
'When using 'Cut' You just Remove the String you copied
If you're talking about TextBoxes, then you can use the SelText property.
Code:'Paste
Text1.SelText = Clipboard.GetText
'Copy
Clipboard.SetText Text1.SelText
'Cut
Clipboard.SetText Text1.SelText
Text1.SelText = ""
Sometimes just the ClipBoard.SetText doesn't work if there's already some text in it, so I recommend:
have fun thoughCode:ClipBoard.Clear 'clear everything that's already there
ClipBoard.SetText "HEY!"