ListBox中的字符串超长显示的解决方法
来源:互联网 发布:免费彩票网站源码 编辑:程序博客网 时间:2024/04/29 13:30
Option Explicit
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Const LB_ITEMFROMPOINT = &H1A9
Private Sub Form_Load()
Dim i As Integer
For i = 0 To 5
List1.AddItem "ListItem字符串超长超长超长超长超长咯 " & i
Next
End Sub
Private Sub List1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Dim lParam As Long
Dim lResult As Long
lParam = (CInt(Y / Screen.TwipsPerPixelY) * 2 ^ 16) + CInt(X / Screen.TwipsPerPixelX)
lResult = SendMessage(List1.hwnd, LB_ITEMFROMPOINT, 0, ByVal lParam)
If lResult < 0 Or lResult > 32767 Then
List1.ToolTipText = ""
Exit Sub
End If
Dim nIndex As Integer
nIndex = CInt(lResult)
List1.ToolTipText = List1.List(nIndex)
End Sub
- ListBox中的字符串超长显示的解决方法
- ListBox中的字符串超长显示的解决方法
- 解决AndroidStudio的logcat显示超长字符串的问题
- 使用javascript解决字符串超长显示的问题
- table中的超长字符串用省略号表示的css样式
- MFC:文本内容显示到ListBox,顺序不正确的解决方法
- 显示Select的超长Option
- 超长字符的分页显示
- 截取单元格内超长的字符串并用当鼠标指上去时显示全部字符串
- HTML中文字太长的时候自动隐藏超长的字符串,直接显示:点点点
- 超长字符串
- 超长字符串
- WTL分列显示的ListBox
- WTL分列显示的ListBox
- 关于截取超长字符串的办法
- 关于截取超长字符串的办法
- 超长整数字符串乘法的算法
- 字符串连接超长的解决wmsys.wm_concat()
- 千篇一律:“外挂”泛滥的网游公关写作
- 实现listview控件report视图下任何列头的双向排序
- 致中国黑客和红客的公开信
- Alternatives to ios::nocreate and ios::noreplace
- CS:SOURCE config.cfg
- ListBox中的字符串超长显示的解决方法
- 处理鼠标移出事件
- FreeXploiT HTML(Hacker Technology Mad Lead)
- 如何通过UDF实现查询汉字拼音的首字母?
- 界面开发之Flat3DButton
- 欢迎光临oscarcao的博客!
- 调用IE的收藏夹
- 前天申请的域名生效啦 ! Mark!
- FSO组件操作