Advertisement
6_2008-2009 Files/ File Controls/ Input/ Output #195844

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

Resumen de IA: 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.

Código fuente
original-source
' 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
Comentarios originales (3)
Recuperado de Wayback Machine