首页 > 代码库 > [VB.NET]拖动操作的技术基础
[VB.NET]拖动操作的技术基础
1、设置需要接受拖动事件的控件的AllowDrop属性为True,在开发界面时配置,不可通过代码配置
2、在DragEnter事件处理程序里,为e.Effet设置枚举值,否则拖动无效
Private Sub GroupBox1_DragEnter(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles GroupBox1.DragEnter e.Effect = DragDropEffects.Link End Sub
3、在DragDrop事件中处理拖入的内容
Private Sub GroupBox1_DragDrop(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles GroupBox1.DragDrop s = e.Data.GetData(System.Windows.Forms.DataFormats.FileDrop) Me.Text = "File Pro - 正在移动文件" End Sub
4、获取拖入的内容
s = e.Data.GetData(System.Windows.Forms.DataFormats.FileDrop)
[VB.NET]拖动操作的技术基础
声明:以上内容来自用户投稿及互联网公开渠道收集整理发布,本网站不拥有所有权,未作人工编辑处理,也不承担相关法律责任,若内容有误或涉及侵权可进行投诉: 投诉/举报 工作人员会在5个工作日内联系你,一经查实,本站将立刻删除涉嫌侵权内容。