拖动vb.net时显示拖动的项目

Question

我想在表单中拖动时显示拖动的控件。我有一个可拖动的控件列表(文本框和图片框(。我想一直显示拖动的控件，只要控件被拖动，即使用户无法放下它。我也有拖动图片框的问题。它显示控件的拖动图像，但它会闪烁。

图片框拖动反馈代码

Private Sub qrCode_GiveFeedback(ByVal sender As Object, ByVal e As GiveFeedbackEventArgs) Handles QRCodeDrag.GiveFeedback
Dim bitmap As Bitmap
bitmap = New Bitmap(QRCodeDrag.Width, QRCodeDrag.Height)
QRCodeDrag.DrawToBitmap(bitmap, New Rectangle(Point.Empty, bitmap.Size))
'bitmap.MakeTransparent(Color.White)
Dim cursor As New Cursor(bitmap.GetHicon)
Cursor.Current = cursor
End Sub

有什么想法吗？

Answer 1

我忘记添加

e.UseDefaultCursors = False

这解决了闪烁的问题