| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1297 人关注过本帖
标题:悬浮框的问题
只看楼主 加入收藏
chen3bing
Rank: 3Rank: 3
等 级:论坛游侠
帖 子:507
专家分:104
注 册:2008-11-12
结帖率:91.22%
收藏
已结贴  问题点数:10 回复次数:4 
悬浮框的问题
图片附件: 游客没有浏览图片的权限,请 登录注册

如图,别人做的界面。
我想仿作,可是不知道怎么做。
第一,如何让打开界面时两个listbox框第一行显示为蓝色?
第二,如何在鼠标经过每一行时显示一个悬浮框?
谢谢!

[此贴子已经被作者于2020-2-24 16:11编辑过]

搜索更多相关主题的帖子: 一行 界面 显示 鼠标 listbox 
2020-02-24 16:10
wmf2014
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:216
帖 子:2039
专家分:11273
注 册:2014-12-6
收藏
得分:5 
Private Sub List1_Click()
  List1.ToolTipText = List1
End Sub

能编个毛线衣吗?
2020-02-25 09:56
chen3bing
Rank: 3Rank: 3
等 级:论坛游侠
帖 子:507
专家分:104
注 册:2008-11-12
收藏
得分:0 
谢谢!我的意思是鼠标从上方移动时出现,我改为
Private Sub List1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
List1.ToolTipText = List1
End Sub
可是不好使。
2020-02-25 10:19
wmf2014
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:216
帖 子:2039
专家分:11273
注 册:2014-12-6
收藏
得分:5 
只要设置了ToolTipText值,鼠标移过都会显示的,不需要响应MouseMove事件。大部分控件都有ToolTipText属性。

能编个毛线衣吗?
2020-02-25 10:22
chen3bing
Rank: 3Rank: 3
等 级:论坛游侠
帖 子:507
专家分:104
注 册:2008-11-12
收藏
得分:0 
回复 4楼 wmf2014
感觉效果不太好,如果选中了一个,背景色变为蓝色,那么鼠标移过其他文本时,也是显示选中的那个,而且感觉很不灵活。
2020-02-25 11:20
快速回复:悬浮框的问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.014793 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved