复制picturebox控件中的图片
请问高手如何复制picturebox控件中的图片,并将它粘贴到WORD或PHOTOSHOP中,谢谢
[解决办法]
利用剪贴板试试看
[解决办法]
me.picturebox1.image.save(“c:\a.ipg”) '另存一图片
剩下的你会了。。。。
[解决办法]
Dim xlApp As New Excel.Application()
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet
xlBook = xlApp.Workbooks().Add
xlSheet = xlBook.Worksheets( "sheet1 ")
Clipboard.Clear()
Clipboard.SetImage(Me.PictureBox1.Image)
Dim range1 As Excel.Range = xlApp.Range( "f5 ")
range1.Select()
xlSheet.Paste()
xlApp.Visible = True