VB dragdrop事件到底怎么用呀 谁能举个例子

来源：学生作业帮助网 编辑：作业帮 时间：2024/07/27 15:54:59
VB dragdrop事件到底怎么用呀 谁能举个例子
xŔKA!AÄʂ 1N0;[zqnJPx KfgN n$z23{?LVg| "%a`^Q_vd]Eר6uaT{>ƉiClߦ($uKPeqqtx0R4nb qOeqȀ|b~a9i&WWU3aFؖcH#3 %(tY:c&ӊ[ostO|t9bxgTc'eX?۳3 xFp yq9^u&~Mg T#FiF;?Q^tR%q,6i6^*Lf%;>?~j/T0 76 ]]Bi}M9y׻gU4:;b /7O 

VB dragdrop事件到底怎么用呀 谁能举个例子
VB dragdrop事件到底怎么用呀 谁能举个例子

VB dragdrop事件到底怎么用呀 谁能举个例子

参考：http://iask.sina.com.cn/b/5207783.html

Option Explicit
    Dim cx As Long, cy As Long

Private Sub Form_DragDrop(Source As Control, X As Single, Y As Single) '在FORM的dragdrop事件中移动控件
    Source.Move X - cx, Y - cy
End Sub

Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) '记录当前鼠标位置并开始拖动
    Picture1.Drag 1
    cx = X
    cy = Y
End Sub

Private Sub Picture1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) '结束拖动
    Picture1.Drag 2
End Sub

VB dragdrop事件到底怎么用呀 谁能举个例子 VB里的mousemove事件举例在VB里,举一个利用mousemove引发的事件.就是想知道这个mousemove事件是怎么用的! vb怎么设计几个键盘按钮事件 vb怎么用单引号 VB,知道三角函数,怎么用VB算度数? VB中算术表达式ln10用VB表达式怎么表示 最近怎么那么多UFO事件啊,到底发生什么事了 lg7.6 用VB语言怎么表示? 怎么用VB计算N的阶层 VB里app.该怎么用呢? 怎么用VB表达出00 用vb怎么生成3位随机数 VB中计算c = 5 (x-32) / 9 用VB语言怎么写 VB随机数怎么做 VB怎么写计算器 VB作业怎么做 湖南湘乡校园踩踏事件详情湖南湘乡校园踩踏事件,怎么发生的到底?具体情况说说. 独立事件互斥事件的概率是怎样运算的已知两个概率,到底哪个事件是用乘法,哪个事件用加法.