[浏览完整版]
标题：[分享]showtooltip多行显示代码
1楼
332595 发表于：2015/12/16 8:50:00做了个综合信息查询小系统，其中就有一个文件管理的小功能，当鼠标移动到“文件”列之后通过showtooltip显示内容，因为showtooltip不支持多行，所以就想了个笨办法实现该功能，代码其实不够简洁，目前只想到这么多，请版主及网友指正。
此主题相关图片如下：1.jpg
以下内容只有回复后才可以浏览
[此贴子已经被作者于2015/12/16 8:52:02编辑过]
2楼
方丈 发表于：2015/12/16 9:06:00看看
3楼
大红袍 发表于：2015/12/16 9:24:00汗，没这么麻烦
Dim s As String = "奥斯都发酥覅哦啊速递发生地发哦深刻的佛啊是自行车阿斯达克佛"
Dim str As String = ""
Dim c As Integer = Math.Floor(s.length / 10)
For i As Integer = 0 To c - 1
str &= s.SubString(i*10, 10) & vbcrlf
Next
str &= s.SubString(c*10) & vbcrlf
msgbox(str)
4楼
332595 发表于：2015/12/16 10:24:00以下是引用大红袍在2015/12/16 9:24:00的发言：
汗，没这么麻烦
Dim s As String = "奥斯都发酥覅哦啊速递发生地发哦深刻的佛啊是自行车阿斯达克佛"
Dim str As String = ""
Dim c As Integer = Math.Floor(s.length / 10)
For i As Integer = 0 To c - 1
str &= s.SubString(i*10, 10) & vbcrlf
Next
str &= s.SubString(c*10) & vbcrlf
msgbox(str)
版主，感谢赐教。。。。
5楼
Hopenight 发表于：2016/8/25 9:44:00学习一下...
6楼
zhengboxin 发表于：2016/8/25 9:53:00
7楼
jswalley 发表于：2016/8/25 10:21:00看看。
8楼
tbarkhai 发表于：2016/8/25 18:30:00看看
9楼
gua12gua 发表于：2016/8/25 18:45:00ddddddddddddd
10楼
百灵 发表于：2016/11/24 21:08:00vb