Question

关于vb的列表框项目的修改

这是原题，底下是我做的添加和删除，求修改和修改确定肿么做QAQ





Answer 1

private sub cmd3_Click()
'修改按钮，把《点击的项目值》赋值给《Text1.Text》
Text1.Text = List1.List(List1.Listindex)
End sub

private sub cmd4_Click()
'修改确定按钮，把《Text1.Text》 赋值给《点击的项目》
List1.List(List1.Listindex) = Text1.Text
End sub

这2行赋值是反过来写而已，意思是把谁赋值给谁。

追问

可cmd4的Enabled的属性为False啊确定不了肿么办
还有cmd4要用到AddItem吧。。？

追答

试试这些结果：先试试后再决定cmd4是不是需要用到Additem(我说不用)
private sub cmd3_Click()
'修改按钮，把《点击的项目值》赋值给《Text1.Text》
Text1.Text = List1.List(List1.Listindex)
cmd4.enabled = true
cmd3.enabled = false
List1.enabled = false
End sub

private sub cmd4_Click()
'修改确定按钮，把《Text1.Text》 赋值给《点击的项目》
List1.List(List1.Listindex) = Text1.Text
cmd3.enabled = false
cmd4.enabled=false
List1.enabled = true
End sub

private sub List1_Click()
cmd3.enabled = true
End sub