找回密码
 立即注册
搜索

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

4
回复
351
查看
[复制链接]

22

主题

233

帖子

57

幻币

一流武者

Rank: 3Rank: 3

积分
298
QQ
2009-3-25 17:24:00 显示全部楼层 |阅读模式
求助: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
PPT学习论坛
回复

使用道具 举报

19

主题

236

帖子

48

幻币

一流武者

Rank: 3Rank: 3

积分
306
QQ
2009-3-25 19:00:17 显示全部楼层
对不起我对VB不是很懂,顶一下吧
PPT学习论坛
回复 支持 反对

使用道具 举报

15

主题

210

帖子

38

幻币

一流武者

Rank: 3Rank: 3

积分
249
QQ
2009-3-25 19:43:31 显示全部楼层
我也想学学VB 因为我也不懂
PPT学习论坛
回复 支持 反对

使用道具 举报

9

主题

185

帖子

36

幻币

一流武者

Rank: 3Rank: 3

积分
245
QQ
2009-3-25 21:11:54 显示全部楼层
我也学习了,谢谢
PPT学习论坛
回复 支持 反对

使用道具 举报

15

主题

223

帖子

36

幻币

一流武者

Rank: 3Rank: 3

积分
264
QQ
2009-3-25 21:37:10 显示全部楼层
这个就得询问高人了...
偶也不太懂这个VB

PPT学习论坛
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册