Foxtable(狐表)用户栏目专家坐堂 → ListView 重命名功能


  共有2553人关注过本帖树形打印复制链接

主题:ListView 重命名功能

美女呀,离线,留言给我吧!
qianqian1530
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:746 积分:5567 威望:0 精华:0 注册:2013/12/4 8:56:00
ListView 重命名功能  发帖心情 Post By:2015/5/14 14:00:00 [显示全部帖子]

LabelEdit 属性为 false,因此 BeginEdit 失败。  


 怎么解决呢

 回到顶部
美女呀,离线,留言给我吧!
qianqian1530
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:746 积分:5567 威望:0 精华:0 注册:2013/12/4 8:56:00
  发帖心情 Post By:2015/5/14 14:50:00 [显示全部帖子]

3q~

  怎么获得 更改后的名称呢?


Dim lvw As WinForm.ListView = e.Form.Controls("ListView1")
If lvw.Current IsNot Nothing Then
    Dim lsv As Object = e.Form.Controls("ListView1").BaseControl
    lsv.LabelEdit = True
    lvw.Current.BeginEdit()
    Application.DoEvents()
    Dim lr As WinForm.ListViewRow = lvw.Current
    MessageBox.Show(lr.text)
End If

 回到顶部