listview添加一行数据(listview怎么设置一行)
vbnetlistview自动添加最后一行
Vbnetlistview 可以通过设置它的一些属性来实现自动添加最后一行的功能,可以设置 ListView 的 “SelectedIndex” 属性来控制被选中的行,当最后一行被选中时,可以设置自动添加最后一行自动的行。 也可以使用 ListView 的 Add 方法来动态添加新行。
qt下listview增加一行数据
在Qt中,可以使用addItem()函数来增加一行数据到listview中。例如,你可以使用以下语句在listview中添加一行数据:
listView-addItem("1","2","3","4");
如何动态在listview中添加一行
下面是以上页面的原代码:
ListView动态添加数据
代码如下:
listView1.View = View.Details;
listView1.FullRowSelect = true;
//定义ListView中要使用的图标文件
ImageList imagelist1 = new ImageList();
imagelist1.Images.Add(Bitmap.FromFile(@"1.gif"));
imagelist1.Images.Add(Bitmap.FromFile(@"2.gif"));
imagelist1.Images.Add(Bitmap.FromFile(@"3.gif"));
listView1.SmallImageList = imagelist1;//定义显示图标
//listView1.LargeImageList = imagelist1;
ListViewItem item1 = new ListViewItem("item1",0);
item1.SubItems.Add("第一行1");
item1.SubItems.Add("第一行2");
item1.SubItems.Add("第一行3");
ListViewItem item2 = new ListViewItem("item2", 1);
item2.SubItems.Add("第一行4");
item2.SubItems.Add("第一行5");
item2.SubItems.Add("第一行6");
ListViewItem item3 = new ListViewItem("item3", 2);
item3.SubItems.Add("第一行7");
item3.SubItems.Add("第一行8");
item3.SubItems.Add("第一行9");
listView1.Items.AddRange(new ListViewItem[] {item1,item2,item3 });
listView1.Columns.Add("第一列");
listView1.Columns.Add("第二列");
listView1.Columns.Add("第三列");
listView1.Columns.Add("第四列");
这是基于WinForm的,在asp.net中无法执行,比如:listView1.View = View.Details;
ListViewItem item3 = new ListViewItem("item3", 2);
这几句都提示没有相关的属性或者方法或者错误。
listview中怎么添加一行新的数据
您好,这样的:
ListViewItem lvItem1 = new ListViewItem();
lvItem1.SubItems.Clear();
lvItem1.SubItems[0].Text = "exe";
lvItem1.SubItems.Add("允许");
lvItem1.SubItems.Add("禁止");
listView1.Items.Add(lvItem1);
ListViewItem lvItem2 = new ListViewItem();
lvItem2.SubItems[0].Text = "txt";
lvItem2.SubItems.Add("允许");
lvItem2.SubItems.Add("允许");
listView1.Items.Add(lvItem2);
可以把listview的数据看成是一个矩阵,listviewitem就相当于矩阵的行,listviewitem的subitems就相当于每一行的列,所以呢,是先new一行,然后在行中的列添加数据。有多少行,就有多少个listviewitem。
C# 如何在listview中的指定行添加一行数据,其它数据向下顺延
和添加逻辑相同,先把前面的和后面的暂时存在内存数组里,然后清空全部,然后追加前面行,添加新行,再追加剩余行。
tkintwr中listview如何添加数据
ListView控件数据操作一、添加表头和数据
在窗口显示数据时,经常会用到ListView这个控件,虽然也可以使用ListBox,但其功能还是比较弱一些,ListView相对用起来更顺手一些。下面的两个函数是给控件添加表头和数据的函数,贴出来供大家参考。
函数代码给ListView添加数据,数据可以为数组或单行数据(逗号分隔)
Public Sub AddListViewData(ListViewName As Object, DateArr, Optional Header As Integer = 0, Optional AddData As Boolean = False)
'添加ListView数据,正常为数组,支持单行数据添加(逗号分隔)
'第一行数据为标题行时,Header应为1
'默认为替换数据,如果需要在原有数据基础上添加时,AddData应为True
Dim i As Integer, j As Integer
Dim DateCol() As String
Dim Itm As Object
Dim PartKey As String
If Not AddData Then ListViewName.ListItems.Clear
If IsArray(DateArr) Then
For i = LBound(DateArr) + Header To UBound(DateArr)
Set Itm = ListViewName.ListItems.Add()
Itm.Text = DateArr(i, LBound(DateArr, 2))
For j = LBound(DateArr, 2) + LBound(DateArr) To UBound(DateArr, 2)
Itm.SubItems(j - LBound(DateArr)) = DateArr(i, j)
Next
Next
Else
If IsEmpty(DateArr) Or DateArr = "没有记录" Then Exit Sub
DateCol = Split(DateArr, ",")
Set Itm = ListViewName.ListItems.Add()
Itm.Text = DateCol(LBound(DateCol))
For i = LBound(DateCol) + LBound(DateArr) To UBound(DateCol)
Itm.SubItems(i - LBound(DateArr)) = DateCol(i)
Next
End If
End Sub
给ListView添加表头,支持直接给定宽度和额外增加的宽度
Public Sub AddListViewHead(ListViewName As Object, ColHeader, Optional ColWidth As String, Optional AddWidth As Integer = 5, Optional DefultWidth As String = "Auto")
Dim SpHeader() As String
Dim SpWidth() As String
Dim SpAlign() As String
Dim CW As Integer
Dim CA As Integer
Dim i As Integer
ListViewName.ColumnHeaders.Clear
ListViewName.ListItems.Clear
SpWidth = Split(ColWidth, ",")
If UBound(SpWidth) = 0 Then CW = Val(ColWidth)
With ListViewName
If IsArray(ColHeader) Then
For i = LBound(ColHeader, 2) To UBound(ColHeader, 2)
If i = UBound(SpWidth) Then CW = Val(SpWidth(i)) Else CW = IIf(DefultWidth = "Auto", 0, CW)
If CW = 0 And CW Len(StrConv(ColHeader(0, i), vbFromUnicode)) * 15 + AddWidth Then CW = Len(StrConv(ColHeader(0, i), vbFromUnicode)) * 15 + AddWidth
If CW 0 Then CW = 0
.ColumnHeaders.Add , , ColHeader(0, i), CW
Next
Else
If ColHeader = "操作不成功" Then Exit Sub
SpHeader = Split(ColHeader, ",")
For i = LBound(SpHeader) To UBound(SpHeader)
If i = UBound(SpWidth) Then CW = Val(SpWidth(i)) Else CW = IIf(DefultWidth = "Auto", 0, CW)
If CW = 0 And CW LenB(StrConv(SpHeader(i), vbFromUnicode)) * 7.5 + AddWidth Then CW = LenB(StrConv(SpHeader(i), vbFromUnicode)) * 7.5 + AddWidth
If CW 0 Then CW = 0
.ColumnHeaders.Add , , SpHeader(i), CW
Next
End If
.View = lvwReport
.FullRowSelect = True
.Gridlines = True
End With
End Sub
调用例子
Sub FormLoad()
AddListViewHead 列表, Range("A1:D1").Value
tmp = SumArrRow(Range("a1:c4").Value, "1,3", True)
AddListViewData 列表, tmp
End Sub