请问,如何实现图片的鼠标拖动?

gwolf 2001-09-18 11:59:32
...全文
80 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
gwolf 2001-09-19
  • 打赏
  • 举报
回复
TMD,电脑和劳资过不去,现在又正常了???C!
多谢小石头,希望以后多多指点小弟。
gwolf 2001-09-19
  • 打赏
  • 举报
回复
行了。但是是右键???
gwolf 2001-09-19
  • 打赏
  • 举报
回复
我试了一下,不行:(
starbattler 2001-09-18
  • 打赏
  • 举报
回复
在鼠标左键按下事件中,记录坐标 mouseX,mouseY
在鼠标mousemove事件中:
先判断鼠标是否按下。
if mousepress= true then
这时,鼠标在按下后移动移动的值,就被picture1.top 和 .left加上
picture1.top=picture1.top+(mouseX-X) 'X、Y为在mousemove事件中获得的当前坐标
picture1.left=picture1.left+(mouseY-Y)
endif
gwolf 2001-09-18
  • 打赏
  • 举报
回复
谁知道?速回答。

7,759

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧