VB 设置ListView中指定一行的背景颜色

代码如下：

'SetListViewBGColor(ListView控件名称,要设置的背景颜色行号,颜色值-默认：&HB6B4FF)

Public Sub SetListViewBGColor(ByRef ListView As ListView, _
                              ByRef Index As Long, _
                              Optional BGColor As Long = &HB6B4FF)
    'author:www.newxing.com
    Dim lineTop As Long, lineHeight As Integer
    Static Pic As PictureBox
    If Pic Is Nothing Then Set Pic = Controls.Add("VB.PictureBox", "picbg")
    lineHeight = ListView.ListItems(Index).Height
    lineTop = lineHeight * (Index - 1)

With Pic
        .Cls
        .AutoRedraw = True
        .Visible = False
        .ScaleMode = vbTwips
        .Font = ListView.Font
        .BorderStyle = 1
        .Appearance = 0
        .Height = lineHeight * ListView.ListItems.Count + lineHeight
        .Width = ListView.Width
    End With

Pic.Line (0, lineTop)-(Pic.Width, lineTop + lineHeight), BGColor, BF
ListView.Picture = Pic.Image

End Sub

摘自：网络整理

相关文章参考：

※VB 单击Listview控件某列表头进行排序

※VB Listview导出到CSV文件函数

※VB 设置Listview中指定一行的背景颜色

※vb Listview扁平表头的列表框

★

VB部分相关文章推荐：★

☆VB 读写TXT文本文件函数

☆VB 提取TextBox 文本框中指定一行字符串

☆VB 使用SendMessage枚举文件与目录

☆VB 二进制数组与十六进制字符串相互转换

☆VB 二进制数据读写实例

☆VB 进制转换大全(十进制、十六进制、八进制、二进制、二进制流)互转

☆VB 实现UTF-8 与GB2312互转

☆VB 设置ListView中指定一行的背景颜色

☆VB SendMessage向其他程序窗口发送字符串消息实例

☆VB Listview导出到CSV文件函数

☆vb卸载所有窗体

☆VB中Null, Empty, Nothing, and vbNullString的区别

☆用RtlAdjustPrivilege来调整进程权限(VB6.0代码)

☆获取对象的接口信息(方法/属性/事件)(VB6代码)

☆[VB]SaveSetting 语句和 DeleteSetting 语句

☆VB APP对象属性一览表 + 灵活使用VB的APP对象

☆[vb]SendMessageA函数

☆使用VB绘制抛物线动画曲线

☆关于vb中的容器

☆[vb]利用WScript.Shell对象隐藏cmd命令行运行

☆浅析VB For Each.Next语句

☆VB中窗体模块、标准模块、类模块的区别

☆引用 VB类模块

☆VB中什么是类，类模块有什么作用

☆VB SendKeys 语句

☆VB 全局热键

☆用VB轻松调用其他程序

☆vb读取txt文件到textbox

☆如何去优化你的VB程序3

☆如何去优化你的VB程序2

☆如何去优化你的VB程序1

☆[VB]在状态栏中显示帮助信息

☆[VB]把屏幕保存为图像

☆Mp3Play.ocx控件让音乐之声响起来

VB 设置ListView中指定一行的背景颜色相关推荐

VB 提取TextBox 文本框中指定一行字符串
这是使用EM_GETLINE message来做,比较奇特的是lParam是指向一个字串所在的位置, 但是该字串传入时,前两个Byte要存该字串允许的最大长度. '以下在Form需一个TextBox, ...
设置ListView中的所有Item均不可点击
设置ListView中的所有Item均不可点击正常地说一般要是使一个控件不可点击,不外乎使用以下几种方法 - setEnable - setClickable - setFocusable 但是对于 ...
使用NPOI设置Excel表的单元格背景颜色
使用NPOI设置Excel表的单元格背景颜色 2016年12月15日 15:25:01 起个名字真的好难啊阅读数:15091更多个人分类: 文件操作版权声明:本文为博主原创文章,未经博主允许不得 ...
vivo计算机背景,怎么修改VIVO手机浏览器中的主题与背景颜色
怎么修改VIVO手机浏览器中的主题与背景颜色腾讯视频/爱奇艺/优酷/外卖充值4折起随着科技的发展,手机已经成为人们日常生活中必不可少的工具,当我们在使用vivo手机内的浏览器浏览网页时,如果想要 ...
html指定区域的背景颜色,JS实现点击颜色块切换指定区域背景颜色的方法
本文实例讲述了JS实现点击颜色块切换指定区域背景颜色的方法..具体实现方法如下: 代码如下: JS实现点击颜色块切换指定区域的背景颜色适时切换网页指定区域背景颜色请选择背景: function g ...
R语言使用plot函数可视化数据、使用pch参数设置数据点的形状、使用lwd参数和bg参数设置数据点边框宽度、背景颜色（仅限于 21到25）
R语言使用plot函数可视化数据.使用pch参数设置数据点的形状.使用lwd参数和bg参数设置数据点边框宽度.背景颜色(仅限于 21到25) 目录
如何在fragment中添加ListView，并设置ListView中条目的值
最后界面如下: 制作思路:首先在一个Activity中做出左右fragment(碎片的意思),然后再在左边的fragment中加入ListView控件,再用编程的方法给ListView控件设置条目,即 ...
EXCEl中如何设置单元格的下拉列表及背景颜色设置
1.选中单元格,点击数据-数据有效性 2.设置中有效性条件,允许-序列,勾选提供空值和提供下拉箭头 3.来源中可手动输入需要的值,中间以英文状态下的逗号隔开 4.背景颜色设置: 选择列-开始-条件 ...
eclipse中字体大小及背景颜色设置
一.字体大小设置 Window--->Preferences--->General---> Appearence ---> Colors And Fonts ---> ...

VB 设置ListView中指定一行的背景颜色

※vb Listview扁平表头的列表框

VB 设置ListView中指定一行的背景颜色相关推荐

最新文章

热门文章