ListView在 lvwReport状态下，怎样设置指定列 编辑或不可编辑

ListView在   lvwReport状态下，怎样设置指定列   编辑或不可编辑？？？ 问题点数：20、回复次数：13Top

1 楼baoaya（点头)(大风起兮云飞扬）回复于 2004-12-01 13:47:15 得分 0

listview1.StartLabelEdit     开始编辑Top

2 楼haiz_2001（海啸）回复于 2004-12-01 13:48:34 得分 0

那不是Top

3 楼baoaya（点头)(大风起兮云飞扬）回复于 2004-12-01 13:50:14 得分 0

只要把   LabelEdit   属性设置成   lvwManual   （手动）  
   
  然后要编辑的时候先选定该项目   ，然后调用   StartLabelEdit     开始编辑  
   
  Top

4 楼haiz_2001（海啸）回复于 2004-12-01 13:52:07 得分 0

OK  
  还有老大  
  我怎样得到指定列     和   行   的指Top

5 楼myhgyp（也许是这样的，信不信由你）回复于 2004-12-01 13:54:23 得分 0

ListView不可以设置指定列编辑，我试过，只能整个控件设置成“可编辑”(或不可编辑），但Treeview是可以的。Top

6 楼baoaya（点头)(大风起兮云飞扬）回复于 2004-12-01 14:14:46 得分 0

Private   Sub   Command1_Click()  
          ListView1.SetFocus  
          ListView1.ListItems.Item(1).Selected   =   True   '选择第一个   为编辑对象  
          ListView1.StartLabelEdit  
  End   SubTop

7 楼baoaya（点头)(大风起兮云飞扬）回复于 2004-12-01 14:16:12 得分 10

注意   一定要先设置好焦点：   ListView1.SetFocusTop

8 楼haiz_2001（海啸）回复于 2004-12-01 14:20:56 得分 0

老大  
  我想编辑第二列  
  可是我实在没办法  
  不知道怎么做  
  你好人做到底啊  
   
  我知道在VC里很容易实现  
  可VB我实在没办法Top

9 楼baoaya（点头)(大风起兮云飞扬）回复于 2004-12-01 14:23:43 得分 0

只要把ListView1.ListItems.Item(1)   换成   ListView1.ListItems.Item(2)就可以了   第3行就换成3  
   
   
  Private   Sub   Command1_Click()  
          ListView1.SetFocus  
          ListView1.ListItems.Item(2).Selected   =   True   '选择第2个   为编辑对象  
          ListView1.StartLabelEdit  
  End   Sub  
  Top

10 楼haiz_2001（海啸）回复于 2004-12-01 14:25:34 得分 0

老大  
  我要哭了  
   
  是列     不是行Top

11 楼fishzone（阿愚@脸上有疤）回复于 2004-12-01 14:31:12 得分 0

 
  下面可以访问   第二行第二列  
   
  listview1.ListItems(2).ListSubItems(1).text  
   
  第三列：  
  listview1.ListItems(2).ListSubItems(2).text  
  Top

12 楼baoaya（点头)(大风起兮云飞扬）回复于 2004-12-01 14:32:18 得分 0

ListView   一般只能编辑第一列，要不你换别的控件吧Top

13 楼myhgyp（也许是这样的，信不信由你）回复于 2004-12-01 15:28:20 得分 10

Option   Explicit  
   
  Private   Sub   Command1_Click()  
          ListView1.SetFocus  
          ListView1.ListItems.Item(ListView1.SelectedItem.Index).Selected   =   True       '选择第一个   为编辑对象  
          ListView1.StartLabelEdit  
   
  End   Sub  
   
  Private   Sub   Form_Load()  
  Dim   I   As   Integer  
  Dim   Nodx   As   ListItem  
  For   I   =   1   To   5  
          Set   Nodx   =   ListView1.ListItems.Add(,   "S"   &   I,   "myh"   &   I)  
          Nodx.SubItems(5)   =   "第六列"  
          Nodx.SubItems(1)   =   "第二列"  
          Nodx.SubItems(2)   =   "第三列"  
          Nodx.SubItems(3)   =   "第四列"  
          Nodx.SubItems(4)   =   "第五列"  
  Next   I  
   
  End   Sub  
   
  只能编辑ListItem的Text属性列，不能修改其它列Top

相关问题

• 选择
• listview1
• 编辑
• startlabeleditend
• 指定列
• listitems
• 设置
• listview
• setfocus
• 不可

• 帖主：haiz_2001
• baoaya
• myhgyp

• Visual Basic类图书
• Visual Basic类源码下载