vb listview(VB关于listview使用的问题)

本文目录
- VB关于listview使用的问题
- VB ListView 用法
- vb中控件listview的详细使用
- vb中listview控件怎么改变某一项的字体和字体颜色
- vb中如何向listview中同时添加多个文本文件路径
- VB中listview的用法
- vb中怎么添加listview控件
- VB listview控件问题
VB关于listview使用的问题
Select Case ColumnHeader.Key ’标题栏的 Key 属性
Case “Sex“: ListView1.SortKey = 1 ’标题第1列 (排序)
ListView1.SortOrder = lvwAscending ’将数据按升序排列
ListView1.Sorted = True ’启用项目排序
Case “Age“: ListView1.SortKey = 2 ’ 标题第2列 (排序)
ListView1.SortOrder = lvwAscending ’将数据按升序排列
ListView1.Sorted = True ’启用项目排序
End Select
VB ListView 用法
先定义ListView1的多列,如:
With ListView1
.ColumnHeaders.clear
.ColumnHeaders.Add , , “操作时间“, 3000
.ColumnHeaders.Add , , “操作内容“, 3000
end with
然后再赋每行值:
Dim lvwItem As ListItem
Set lvwItem = lsvUpPort.ListItems.Add ...... ’操作时间
lvwItem.SubItems(1) = ....... ’操作内容
vb中控件listview的详细使用
1、首先,点击文件-》新建-》项目,打开项目创建视窗,切换到Visual Basic,选择Windows窗体应用程序,新建一个。
2、在左侧工具箱中找到ListView控件,单击并在右侧窗体中创建一个。
3、点击ListView控件右上角的小按钮,展开ListView任务面板,点击项,打开ListViewItem集合器。
4、新建一个按钮,在按钮的事件响应函数中写下MsgBox(ListView1.ToString()),ListView的ToString函数返回的是这个控件的信息,如图。
5、如果要获取所有item的信息,使用For Each循环遍历item如下。
6、这样把每个列表元素的ToString等信息存到tps字符串,显示出来如图。
vb中listview控件怎么改变某一项的字体和字体颜色
一、改变颜色
在VB6的ListView控件中,可以改变项目及其子项的前景色、背景色。实现方法如下
(1)在窗体上布置一个ListView控件
(2)窗体代码如下
Option ExplicitPrivate Sub Form_Load()
Dim itemX As ListItem
With ListView1
.View = lvwReport
.ColumnHeaders.Add , , “类别“
.ColumnHeaders.Add , , “品名1“
.ColumnHeaders.Add , , “品名2“
Set itemX = .ListItems.Add(, , “水果“)
itemX.SubItems(1) = “苹果“
itemX.SubItems(2) = “香蕉“
ChangeForeColor itemX, &H8000& ’墨绿色
Set itemX = .ListItems.Add(, , “饮料“)
itemX.SubItems(1) = “果汁“
itemX.SubItems(2) = “可乐“
ChangeForeColor itemX, vbRed ’红色
Set itemX = .ListItems.Add(, , “文具“)
itemX.SubItems(1) = “铅笔“
itemX.SubItems(2) = “橡皮“
ChangeForeColor itemX, vbBlue ’蓝色
End With
End Sub
’-------------------------------------
’ 修改ListView 项的前景色颜色
’-------------------------------------
Private Sub ChangeForeColor( _
ByVal item As ListItem, _
ByVal NewColor As Long)
’设置项的颜色
item.ForeColor = NewColor
’设置所有子项的颜色
Dim subItem As ListSubItem
For Each subItem In item.ListSubItems
subItem.ForeColor = NewColor
Next
End Sub
(3)运行效果
二、改变字体
ListView控件中,ListItem以及ListSubItem中没有字体属性,所以无法改变单独某个项或子项的字体;只能改ListView控件的字体。
运行效果
vb中如何向listview中同时添加多个文本文件路径
VB ListView控件用法集合ListView控件比前面几种控件要复杂一些,通过此控件,可将项目组成带有或不带有列标头的列,并显示伴随的图标和文本。ListView控件是由ColumnHeader和ListItem对象所组成的,其中ColumnHeader对象的个数决定了控件的列数,而ListItem对象的个数则决定了控件的行数。(图7) ColumnHeader对象是ListView控件中包含标头文字的项目。利用ColumnHeader对象,用户可以: ▲单击对象触发ColumnClick事件并根据数据项目将项目排序。 ▲拖动对象的右边框来调整列宽度。 ▲在报表视图中隐藏ColumnHeader对象。 ColumnHeader对象的数目决定每个ListItem对象可包含的子项目数目。删除ColumnHeader对象后所有与列关联的子项目也将被删除,并且每个ListItem对象的子项目数组将平移以更新ColumnHeader的索引,而这将导致剩余的列标头SubItemIndex属性的改变。ColumnHeader对象的SubItemIndex属性 该属性返回与ListView控件中ColumnHeader对象关联的子项目的索引。子项目是字符串数组,代表显示在报表视图中的ListItem对象的数据。第一列的列标头SubItemIndex属性设置为0,这是因为小图标和ListItem对象的文字总出现在第一列中,而且它们被当作ListItem对象而不是子项目。列标头数目取决于子项目数目。列标头数目总是比子项目数目多1。 在设计时可以利用属性页的“列首”选项卡将ColumnHeader对象添加到ListView控件中,在运行时则用Add方法添加。
VB中listview的用法
文本文件 1.txt
里面内容是:
李佳
22
文秘
13655555555
张奇
24
经理
13755555555
张佳
22
135555555
Public Sub LVrefresh(Optional ByVal StandardType As Boolean)
Dim intRow As Integer, strTemp As String
Dim fileNo As Integer, fileName As String
Dim Fp As New FileSystemObject
Dim strTs As TextStream
Dim ListItemTemp As ListItem
On Error Resume Next
fileNo = FreeFile
With ListView1
.ColumnHeaders.Clear
.ListItems.Clear
.ColumnHeaders.Add , , “姓名“
.ColumnHeaders(1).Width = 1200
.ColumnHeaders.Add , , “年龄“
.ColumnHeaders(2).Width = 900
.ColumnHeaders.Add , , “职位“
.ColumnHeaders(3).Width = 2000
.ColumnHeaders.Add , , “联系电话“
.ColumnHeaders(4).Alignment = lvwColumnLeft
.ColumnHeaders(4).Width = 2000
intRow = 1
fileName = IIf(Left(App.Path, 1) = “\“, App.Path & “1.txt“, App.Path & “\1.txt“)
Set strTs = Fp.OpenTextFile(fileName)
strTemp = strTs.ReadLine
Do While Err.Number = 0
If intRow = 1 Then
Set ListItemTemp = .ListItems.Add(, , strTemp)
Else
ListItemTemp.SubItems(intRow - 1) = strTemp
End If
If intRow = 4 Then
intRow = 1
Else
intRow = intRow + 1
End If
strTemp = strTs.ReadLine
Loop
End With
End Sub
Private Sub Command1_Click()
LVrefresh
End Sub
vb中怎么添加listview控件
添加listview控件的方法如下:
打开VB6.0
按下CTRL+T
添加Microsoft Windows Common Controls 6.0部件
就会出现listview控件了
VB listview控件问题
什么是ListView控件
VB高级控件,高级之处在于它使用了对象的方式组织内容。
要使用ListView控件,需要加入组件:
Microsoft Windows Common Controls 6.0
Windows资源管理器的右半部分,就是一个ListView控件。
作用
列出并列关系的对象及对象属性。
ListView控件的对象层次结构
ListView -整个控件
ColumnHeaders -标题行
ColumnHeader -标题列
ListItems -对象行集合
ListItem -对象行
ListSubItems -对象属性集合
ListSubItem -对象属性
注意:SubItems和ListSubItems的区别:SubItems是一个String数组;ListSubItems是一个集合。
属性
View:设置ListView的外观
Sorted:设置ListView中的对象集合是否排序。
SortKey:设置以第几项排序。从零开始。
SelectedItem:返回选中的对象的引用。
事件
AfterLabelEdit:ListItem对象的标签时被触发。
BeforeLabelEdit:ListItem对象的标签后出发。
ColumnClick:单击列标题时触发。参数中可以获得被单击的列对象。通常用于排序。
ItemClick:单击某行或某ListItem时触发。参数中可以获得被单击的ListItem对象。
方法
FindItem:搜索ListItem对象。
参数:
string:搜索字符串。
value:在ListItem的哪部分中搜索(LvwText、LvwSubItem、LvwTag);index:开始搜索的位置。
match:匹配方式。
HitTest:检索位于特定坐标处的ListItem对象。

更多文章:
issued retroactively(FORM E上盖“ISSUED RETROACTIVELY”的问题,小女在线等待)
2026年10月15日 10:30
begin和start的区别(start与begin的区别)
2026年10月15日 09:20
vant官网中文(范特365 是韩国化妆品VANT36.5吗)
2026年10月15日 09:10
prison break(越狱(prison break)到底是在讲个什么)
2026年10月15日 06:50
c程序设计第五版教学视频(求C程序设计(第五版)谭浩强教材源代码、视频课件等电子版资料!谢谢大家!)
2026年10月15日 06:40
十六进制转二进制表(16进制转为2进制、8进制、10进制的公式)
2026年10月15日 06:10





