none
vb.net 拖曳PictureBox1到Webbrowser1 RRS feed

  • 問題

  • vb.net 拖曳PictureBox1到Webbrowser1,我想問這如何做到?

    Public Class Form1

     
        Private intCheck As Int32 = 0
        Dim pointTemp As New Point()
        Dim temp_x, temp_y As Integer

        Private Sub PictureBox1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseDown
            If e.Button = MouseButtons.Left Then
                intCheck = 1
                temp_x = e.X
                temp_y = e.Y
            End If
        End Sub
        Private Sub PictureBox1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseUp
            If e.Button = MouseButtons.Left Then
                intCheck = 0
                temp_x = 0
                temp_y = 0
            End If
        End Sub

        Private Sub PictureBox1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseMove
            If intCheck = 1 And e.Button = MouseButtons.Left Then
                pointTemp.X += (e.X - temp_x)
                pointTemp.Y += (e.Y - temp_y)
                Me.PictureBox1.Location = pointTemp

            End If
        End Sub


    End Class

    2016年1月31日 下午 03:56

解答

  • Performing Drag-and-Drop Operations


    在現實生活中,你和誰在一起的確很重要,甚至能改變你的成長軌跡,決定你的人生成敗。 和什麼樣的人在一起,就會有什麼樣的人生。 和勤奮的人在一起,你不會懶惰; 和積極的人在一起,你不會消沈; 與智者同行,你會不同凡響; 與高人為伍,你能登上巔峰。

    • 已標示為解答 vb.happy 2016年2月12日 下午 12:11
    2016年1月31日 下午 07:11
    版主
  • http://www.vbforums.com/showthread.php?529211-RESOLVED-2-0-Drag-and-Drop-from-Internet-Explorer

    這裡有個例子,剛好是相反,從IE 去 pictureBox,給你做個參考吧


    大家一齊探討、學習和研究,謝謝!
    MCSD, MCAD, MCSE+I, MCDBA, MCDST, MCSA, MCTS, MCITP, MCPD,
    MCT, Microsoft Community Star(TW & HK),
    Microsoft MVP for VB.NET since 2003
    My MSMVP Blog

    請記得將對您有幫助的回覆 標示為解答 以幫助其他尋找解答及參與社群討論的朋友們。
    Please remember to click Mark as Answer on the post that helps you. This can be beneficial to other community members reading the thread.

    • 已標示為解答 vb.happy 2016年2月12日 下午 12:11
    2016年2月1日 上午 02:45

所有回覆

  • Performing Drag-and-Drop Operations


    在現實生活中,你和誰在一起的確很重要,甚至能改變你的成長軌跡,決定你的人生成敗。 和什麼樣的人在一起,就會有什麼樣的人生。 和勤奮的人在一起,你不會懶惰; 和積極的人在一起,你不會消沈; 與智者同行,你會不同凡響; 與高人為伍,你能登上巔峰。

    • 已標示為解答 vb.happy 2016年2月12日 下午 12:11
    2016年1月31日 下午 07:11
    版主
  • http://www.vbforums.com/showthread.php?529211-RESOLVED-2-0-Drag-and-Drop-from-Internet-Explorer

    這裡有個例子,剛好是相反,從IE 去 pictureBox,給你做個參考吧


    大家一齊探討、學習和研究,謝謝!
    MCSD, MCAD, MCSE+I, MCDBA, MCDST, MCSA, MCTS, MCITP, MCPD,
    MCT, Microsoft Community Star(TW & HK),
    Microsoft MVP for VB.NET since 2003
    My MSMVP Blog

    請記得將對您有幫助的回覆 標示為解答 以幫助其他尋找解答及參與社群討論的朋友們。
    Please remember to click Mark as Answer on the post that helps you. This can be beneficial to other community members reading the thread.

    • 已標示為解答 vb.happy 2016年2月12日 下午 12:11
    2016年2月1日 上午 02:45