大家好,我们今日继续讲解VBA代码解决方案的第103讲内容:VBA中使用类似于工作表的Listview控件来显示你的任务。ListView控件是VBA程序开发中的常用控件,可以用来显示各项带图标的列表,也可以用来显示带有子项的列表。Listview控件是微软通用控件MSCOMCTL.OCX中的一员,因其美观、易用,是VBA使用者最常用的控件之一。
Listview控件的应用随处可见,比如你的计算机系统中使用的资源管理器,就是Treeview和Listview做出来的,资源管理器的左边是Treeview控件,右边是Listview。Listview有4种视图,Win7系统的资源管理器有7种显示方式,XP有5种,其中大图标对应Listview的lvwIcon,小图标对应lvwSmallIcon,列表对应lvwList,详细信息则对应lvwReport。
一:Listview控件的View属性,这个属性决定在列表中控件使用何种视图显示项目,语法如下:object.view [= value]
参数object是必须的,对象表达式,listview控件。
参数value是必须的,指定控件外观的整数或常数:
lvwicon0图标
lvwsmallicon1小图标
lvwlist2列表
lvwreport3报表
二 ColumnHeader对象。是ListView控件中包含标题文字的项目。应用于ColumnHeader对象的Add方法语法如下:
object.ColumnHeader.Add(index,key,text,width,alignment)
其中参数text代表标题文字,参数width代表标题的列宽,参数alignment代表列标题中文本对齐方式。Listview控件中文本的对齐方法有三种,
lvwColumnLeft0文本向左对齐。(缺省值)
lvwColumnRight 1文本向右对齐。
lvwColumnCenter 2文本居中对齐。
在Listview控件中第一列的文本对齐方式只能设置为左对齐。win7系统改xp系统设置
对于某些控件来说,pnmhdr则会解释成其它内容更丰富的结构对象的指针,如:对于列表控件来说,pnmhdr常常指向一个nmcustomdraw对象,nmcustomdraw结构如下:。multiselectlistpreference类似常见控件的listview,一个item,点击弹出一个多选的listview的dialog,用于通过sharepreferences存储操作的设置值,具体翻墙点我。具体方法如下: 总所周知,采用如下方法: modelname::model() -> find() //找出的是一个对象 modelname::model() -> findall()//找出的是一个对象集合的数组 可以找出对象与对象集合的数组,那么如何找出我所需。有时为了某种需要,vbscript也可放在client端执行,语法格式如下:
ListItems.Add(index,key,text,icon,smallIcon)
其中参数text代表添加的项目内容。
四实测实例:使用Listview控件在用户窗体中显示数据列表,我们先建立一个窗体:
代码如下:
Private Sub UserForm_Initialize()
Dim Itm As ListItem
Dim r As Integer
Dim c As Integer
With ListView1
.ColumnHeaders.Add , , "名称", 50, 0
本文来自电脑杂谈,转载请注明本文网址:
https://www.pc-fly.com/a/ruanjian/article-93379-1.html
听着歌
贬值更加快
离衰退的日子不远了