- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 求助页面集合里的页面如何使用tooltip功能 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=78119)
-- 发布时间：2015/12/2 15:45:00
-- 求助页面集合里的页面如何使用tooltip功能
如题。请教各位高手，谢谢。
-- 发布时间：2015/12/2 15:52:00
--
你要怎么样提示？做例子上来
MouseHover事件
Dim myToolTip As New Windows.Forms.ToolTip()
myToolTip.SetToolTip(e.sender.basecontrol, "提示")
-- 发布时间：2015/12/2 16:01:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.foxdb |
当鼠标移动到page2时，提示“你好”
-- 发布时间：2015/12/2 16:02:00
--
大红袍，请赐教
-- 发布时间：2015/12/2 16:18:00
--
只能用按钮模拟
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目1.foxdb |
-- 发布时间：2015/12/2 16:41:00
--
谢谢，先试一下
-- 发布时间：2015/12/2 16:58:00
--
MouseMove
\'StatusBar.Message1 = e.X & "|" & e.Y \'***先以此测出各页面范围
If e.X > 5 AndAlso e.X < 55 AndAlso e.Y > 0 AndAlso e.Y < 20 Then
e.Sender.ShowToolTip("页面1",600)
ElseIf e.X > 56 AndAlso e.X < 97 AndAlso e.Y > 0 AndAlso e.Y < 20 Then
e.Sender.ShowToolTip("页面2",600)
ElseIf e.X > 102 AndAlso e.X < 146 AndAlso e.Y > 0 AndAlso e.Y < 20 Then
e.Sender.ShowToolTip("页面3",600)
Else
e.Sender.HideToolTip
End If