VB.net中如何直接把Combo
Box下拉项拖放到另一个Combo
Box 虽然.net提供的Combo
Box控件都已
支持拖放动作,以下
代码是参照MSDN写的 Private Sub Combo
Box1_MouseDown(ByVal sender As Object,ByVal e As System.Windows.Forms.MouseEventArgs) Handles Combo
Box1.MouseDown If e.Button = Windows.Forms.MouseButtons.Left And Combo
Box1.DroppedDown Then Combo
Box1.DoDragDrop(Combo
Box1.SelectedText,DragDropEffects.Copy Or DragDropEffects.Move) End If End Sub 调试结果很让人失望,干脆下拉框都弹不出来. 请求高手的帮忙 __________________________________________________________________________ 根避免弹不出来的问题,需要多加一个判断条件 引用MSDN的原文: 当拖动动作启动时,该示例
调用 DoDragDrop
方法。在 MouseDown 事件期间,如果从鼠标位置起鼠标移动的距离大于 SystemInformation.DragSize,则启动拖动动作。IndexFromPoint
方法用于在 MouseDown 事件期间确定要拖动的项的索引。 调试ing...希望这个问题能自己搞定 __________________________________________________________________________
原文链接:https://www.f2er.com/vb/263578.html