Image1 崁入Form1 中.要如何才能還原...
Image1_MouseDown 要移動功能失去效用
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
Set Image1.Container = Form1
Image1.Top = 0
Image1.Left = 0
End Sub
Image1_MouseDown 要移動功能失去效用
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
Set Image1.Container = Form1
Image1.Top = 0
Image1.Left = 0
End Sub
文章標籤
全站熱搜
看不懂你要問什麼? 什麼叫做Image1 崁入Form1 中? 如果Set Image1.Container = Form1叫做[崁入]話, 那還原就是把它設回原來的Container,如: Set Image1.Container = Picture1