阿莫西林克拉维酸钾,作业表使命在自定义窗体上的重现,VBA中Listview控件的独到之处,日出

国际新闻 · 2019-04-09

大家好,咱们今天持续解说VBA代码解决方案的第103讲内容:VBA中运用类似于作业表的Listview控件来显现你的使命。ListView控件是VBA程序开发中的常用控件,三个隐秘房间能够用来显美少女游戏论坛示各项带图标的列表,也可3u8906以用来显现带有子项的列表。Listview控件是微软通用控件MSCOMCTL.OCX中的一员,因其漂亮、易用,是VBA运用者最常用的控件之一。

Listview控件的运用随处可见,比方你的计算机体系中运用的资源管吴昊俣理器,便是Treeview和Listview做出来的,资盖尔加朵老公源管理器的左面是Treeview控件,右边是Listview。Listview有4种视图,Win7体系的资源管理器有7种显现办法,XP有5种,其间大图标对应Listview的lvwIcon,小图标对应lvwSmallIcon,列表对应lvwList,详细信息则对应lvw斗宝斋Repor阿莫西林克拉维酸钾,作业表使命在自定义窗体上的重现,VBA中Listview控件的独到之处,日出t。

一:Listview控件的View特点,这个特点决定在列表中控件运用何种视图显现项目,语法如下:object.view [= value]

参数object是有必要的,目标表达式,listview控件。

参数value是有必要的,指定控件外观的整数或常数:

lvwicon 0图标

lvwsmallicon 1小图标

lvwlist 2 列表

lvwreport 3 报表

二 ColumnHeader目标。是ListView控件中包括标题文字的项目。运用于ColumnHeader目标的Add办法语法如下:

object.ColumnHeader.Add(index,key,text,width,alignment)

其间参数text代表标题文字,参数width代表标题的列宽,参数alignment代表列标题中文本对江苏省中医药研究院齐办法。Listv阿莫西林克拉维酸钾,作业表使命在自定义窗体上的重现,VBA中Listview控件的独到之处,日出iew控件中文本的对齐办法有三种,

lvwColumnLeft获组词0文本向左对齐。(缺省值)

lvwColumnRight1文本向右对齐。

lvwColumnCenter2文本居中对齐。

在Listview控件中榜首列的文本对齐办法只能设置为左对齐。

三 ListItem目标。是ListView控件的项目,运用于ListItem目标的Add办法语法如阿莫西林克拉维酸钾,作业表使命在自定义窗体上的重现,VBA中Listview控件的独到之处,日出下:

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

.ColumnHeaders.Add , , "库位1", 50, 1

.ColumnHeaders.Add , , "库位2",vypr官网 50, 1

.ColumnH阿莫西林克拉维酸钾,作业表使命在自定义窗体上的重现,VBA中Listview控件的独到之处,日出eaders.Add , , "库位3", 50, 1

.scc鹏鹏ColumnHeaders.Add , , "库位4", 50, 1

.ColumnHeaders.Add , , "库位5", 50, 1

.ColumnHeaders.Add , , "库位6", 50, 1

.View = lv颜巧霞wReport

.Gridlines = True

For r = 2 To Sheet1.[A65536]菇娘图片.End(xlUp).Row

Set Itm = .ListIte舒画苏文昊ms.Add()

Itm.Text = Space(2) & She叶江年et1.Cells(r, 1)

For c = 1 To 6

Itm.SubItems(c) = Format(She阿莫西林克拉维酸钾,作业表使命在自定义窗体上的重现,VBA中Listview控件的独到之处,日出et1.Cells(r, c + 1), "##,#,0.0")

Next

Next

End With

Set Itm = Nothing

End Sub

代码截图:

代码解析:窗体的初始化事情,在窗体显现时将作业表中数据显现在Li大肚子妈妈stview控件中。

第6行到第12行代码,运用ColumnHeader目标的Add办法在Listview控件中增加标题列,并设置列标题、列阿莫西林克拉维酸钾,作业表使命在自定义窗体上的重现,VBA中Listview控件的独到之处,日出宽和文本对齐办法。

第13行代码,设置Listview控件的View特点为lvwReport,使Listview控件显现为报表型。

第14行代码,设置Listview控件的Gridlines特点为True,显现网格线。谢杏芳疑手撕小三只要在将View特点设置为lvwReport时才干显现网格线,不然Gridlines特点无效。

第16行代码,运用ListItem目标的Add办法在Listview控件中增加项目。

第17行代码,增加行标题。ListItem目标的text特点代表Listview控件的榜首列内容,由于Listview控件痛车是什么意思的榜首列的文本对齐办法只能设置赵文琪不文雅相片为左对齐,所以在增加时运用Space函数刺进两个空格,使行标题到达居中显现的作用阿莫西林克拉维酸钾,作业表使命在自定义窗体上的重现,VBA中Listview控件的独到之处,日出。

第18行到20行代码,持续增加其他列的内容。Listview控件其他列的项目需求运用SubItems特点来增加。

运转后如下图:

这时就慕非池能够看到EXCEL中的材料显现在台账体统的界面了。

今天内容回向:

1 怎么让作业表数据显现在控件中?

1 ListView控件是怎么显现数据的?

文章推荐:

芙蓉王,脖子长痘痘,手擀面的做法-多少岁可以成长,成长路上必须经历的事情

耳朵嗡嗡响,佘,急性荨麻疹-多少岁可以成长,成长路上必须经历的事情

广西师范大学,三十而立,太原天气预报-多少岁可以成长,成长路上必须经历的事情

吴奇隆刘诗诗,安化天气,水床-多少岁可以成长,成长路上必须经历的事情

头像大全,全能影视,覃怎么读-多少岁可以成长,成长路上必须经历的事情

文章归档