自动调整listview标题头宽度的二种方法

原创 2006年06月02日 10:06:00
自动调整listview标题头宽度的二种方法

方法一:
'*******************************
'用法:Call ResizeListView(ListView1)
'*******************************
Public Sub ResizeListview(objListView As ListView)
    Dim dSecWidth As Double
    Dim iLoop As Integer
    With objListView
         dSecWidth = (.Width / .ColumnHeaders.Count) - 30
         For iLoop = 1 To .ColumnHeaders.Count
          .ColumnHeaders(iLoop).Width = dSecWidth
          '// DoEvents [ Optional, don't really need it ]
         Next iLoop
    End With
End Sub

方法二(使用API):
'**********************
'API声明
Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Const LVM_FIRST = &H1000
'函数
Public Sub AutoSizeColumnHeader(LView As ListView, Column As ColumnHeader, ByVal SizeToHeader As Boolean)
    Dim l As Long
    If SizeToHeader Then l = -2 Else l = -1
    Call SendMessage(LView.hWnd, LVM_FIRST + 30, Column.Index - 1, l)
End Sub
 

版权声明:本文为博主原创文章,未经博主允许不得转载。

相关文章推荐

css中实现字符超出宽度自动换行和英语字符不断行的解决方法

css中实现字符超出宽度自动换行和英语字符不断行的解决方法 为了使英语字符不断开,我在显示内容的style是text-align:justify; text-justify:inter-id...

windows server2008域管理员密码二种恢复方法

windows server2008域管理员密码二种恢复方法 作者:likegongsi | 时间:2012-10-18   第一种方法:   1.使用与本地机器相同版本的的操作系统安...

JLINK修复二种方法

  • 2014-08-14 16:51
  • 24.04MB
  • 下载

Android-build.gradle文件中的版本号提取,方便多个module开发的二种方法

我们在做开发的时候,难免会多人开发,并且有时候会每个人会负责多个模块,我们就需要对gradle进行统一的配置。 比如:
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:深度学习:神经网络中的前向传播和反向传播算法推导
举报原因:
原因补充:

(最多只允许输入30个字)