以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]打开图片问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=127581)

--  作者:1547639740
--  发布时间:2018/11/17 10:31:00
--  [求助]打开图片问题
[求助]例如在”中国地图.table“案例里,我想在窗口1中添加代码实现:在窗口中我将鼠标移到西藏上面时自动用PictureBox打开一张图片,鼠标移开自动关闭这张图片,该怎么弄?
--  作者:y2287958
--  发布时间:2018/11/17 11:47:00
--  
鼠标进入进出事件
--  作者:1547639740
--  发布时间:2018/11/17 11:53:00
--  直接说代码得了
直接说代码得了
--  作者:有点蓝
--  发布时间:2018/11/17 12:25:00
--  

各个名称Label的MouseEnter事件


Dim p2 As WinForm.PictureBox = e.Form.Controls("PictureBox2")
p2.Top = e.Sender.Top + 30
p2.Left = e.Sender.Left + 30
p2.Visible = True

各个名称Label的MouseLeave事件

Dim p2 As WinForm.PictureBox = e.Form.Controls("PictureBox2")
p2.Visible = False

--  作者:1547639740
--  发布时间:2018/11/17 15:01:00
--  
谢谢