MSChart1.EditCopy
Form2.Picture1.Picture = Clipboard.GetData()
Printer.Print " "
Printer.PaintPicture Form2.Picture1.Picture, 0, 0
Printer.EndDoc
Form2.Picture1.Picture = Clipboard.GetData()
Printer.Print " "
Printer.PaintPicture Form2.Picture1.Picture, 0, 0
Printer.EndDoc
Picture1.Picture = Clipboard.GetData()
时老说打开剪贴板错误521
这个问题怎么解决?
有人能告诉我问题出在哪里也好,多谢了
不能打开剪贴板(错误 521)
Clipboard 已经被其它应用程序打开。此错误产生的原因及解决方法如下:
其它应用程序正使用 Clipboard,将不会释放给本应用程序。
这种情况下,在代码中设置一错误陷阱,并提供带有“重试”和“取消”按钮的消息框,以允许较短的暂停后重试。让我试试,看看能不能通过
大家帮忙看看有什么不妥么?Private Sub Command1_Click()
On Error GoTo Mschart_copy_Error
MSChart1.EditCopy
Picture1.Picture = Clipboard.GetData()
Mschart_copy_Error:
Timer1.Enabled = True
Resume Next
End SubPrivate Sub Form_Load()
Timer1.Enabled = False
End SubPrivate Sub Timer1_Timer()
Picture1.Picture = Clipboard.GetData()
Timer1.Enabled = False
End Sub
Timer1.Interval = 10
Timer1.Interval = 1
都能通过,但要是不加那个错误处理就报错
真TNND