listview是不支持subitem的编辑的,大家推荐的很多都是和textbox结合来实现,
但是我在实际用的时候却发现很多问题,
ListView2_ItemClick(ByVal item As MSComctlLib.ListItem)
Dim item As ListItem
Set item = ListView2.SelectedItem
Text2.Top = item.Top + ListView2.Top + 50
Text2.Left = item.Left + ListView2.Left + ListView2.ColumnHeaders(1).width - 200Text2.Text = item.SubItems(1)T_lvItem = item.IndexText2.Visible = True
Text2.SetFocus和
text2_lostfocus()
ListView2.ListItems(T_lvItem).SubItems(1) = Text2.Text
Text2.Visible = False
结合总会出现问题
要不就是输入了数据没有进入subitem(),我把事件放在
Private Sub ListView2_DblClick()
Dim item As ListItem
Set item = ListView2.SelectedItem
Text2.Top = item.Top + ListView2.Top + 50
Text2.Left = item.Left + ListView2.Left + ListView2.ColumnHeaders(1).width - 200Text2.Text = item.SubItems(1)T_lvItem = item.IndexText2.Visible = True
Text2.SetFocus
End Sub
就不会有问题了,