by Steven Bailey (10 Submissions)
Category: Files/File Controls/Input/Output
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Mon 5th June 2000
Date Added: Mon 8th February 2021
Rating: 
(1 Votes)
This code can save/load pictures and textfiles into or out of the clip board. This is an increadably handy tool to have!
VBcoders
Clipboard.SetData LoadPicture(file)
End Function
Public Function Save_Image_From_Clipboard(file As String)
SavePicture Clipboard.GetData, file
End Function
Public Function send_Text_File_To_Clipboard(file As String)
On Error GoTo error
Open file For Input As #1
Clipboard.SetText Input(LOF(1), 1)
Close #1
Exit Function
error:
y = MsgBox("File Not Found", vbOKOnly, "Error")
End Function
Public Function recive_Text_From_Clipboard_to(file As String)
On Error GoTo error
Open file For Output As #1
a$ = Clipboard.GetText
Print #1, a$
Close 1
Exit Function
error:
x = MsgBox("There has been a error!", vbOKOnly, "Error")
End Function
No comments have been posted about This code can save/load pictures and textfiles into or out of the clip board. This is an increadabl. Why not be the first to post a comment about This code can save/load pictures and textfiles into or out of the clip board. This is an increadabl.
