COPY, CUT, PASTE Source code on how to do it EASY
This Code shows you how to copy, cut, and paste with only a few lines this is very easy to do. This is the CODE and not just some garbage like those other copy, paste, and cut. AND IT WORKS!!!
AI
AI Summary: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.
Source Code
' You need a menu with 3 options, cut, copy, paste. Make sure to name them ' mnucut, mnucopy, mnupaste. Or just make 3 buttons and change the code a bit. ' You need one text box, defualt name text1. And thats it. Private Sub mnucopy_Click() If Text1.SelText = "" Then Exit Sub Else Clipboard.Clear Clipboard.SetText Text1.SelText End If End Sub Private Sub mnucut_Click() If Text1.SelText = "" Then Exit Sub Else Clipboard.Clear Clipboard.SetText Text1.SelText Text1.SelText = "" End If End Sub Private Sub mnupaste_Click() Text1.SelText = Clipboard.GetText End Sub
Original Comments (3)
Recovered from Wayback Machine