mbq168 发表于 2009-3-25 17:24:00

求助：PPT实现在窗体上随意拖动图片框或文本框

求助：PPT实现在窗体上随意拖动图片框或文本框
通过PPT学习论坛，论坛中的高手给我带来了希望，让我对ppt有了崭新的认识：ppt是很牛的！
目前，就是遗憾没能学习到在窗体上随意拖动图片框或文本框，
希望论坛中的高人能指点指点小弟，
小弟对VBA不懂，所以希望高手能做这个问题的模板或教程，使自己能用起来！
在此谢谢了！
等待中……
另外，在网络中找到一段据说可以实现的代码（如下），可惜我不会！希望有高手、牛人知道！
再次谢谢！！！
Private Sub Form_Load()
Picture1.DragMode = 1 '设置图片框控件为自动拖动模式
Text1.DragMode = 1 '设置文本框控件为自动拖动模式
End Sub
Private Sub Form_DragDrop(Source As Control, X As Single, Y As Single)
Source.Move X, Y '将源控件移到鼠标指针所指新位置
End Sub

user_mnntw 发表于 2009-3-25 19:00:17

对不起我对VB不是很懂，顶一下吧

user_tceco 发表于 2009-3-25 19:43:31

我也想学学VB 因为我也不懂

user_gzcen 发表于 2009-3-25 21:11:54

我也学习了，谢谢

longzhimeng 发表于 2009-3-25 21:37:10

这个就得询问高人了...
偶也不太懂这个VB

页: [1]
查看完整版本: 求助：PPT实现在窗体上随意拖动图片框或文本框