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
創作者介紹
創作者 小吳 VBQA 程式設計討論 的頭像
vbqa

小吳 VBQA 程式設計討論

vbqa 發表在 痞客邦 留言(1) 人氣( 12 )