UC知道关于list.text的程序，请高人指点下
来源：百度知道 编辑：UC知道 时间：2024/06/07 18:48:04
Private Sub Form_Load()
List1.AddItem "357"
List1.AddItem "246"
List1.AddItem "123"
List1.AddItem "456"
Text1.Text = ""
End Sub
Private Sub Command1_Click()
List.ListIndex = 3
Print List.Text1 + Text1.Text
End Sub
程序运行后，在文本框中输入“789”，然后双击列表框中的“456”，却没什么输出的结果，请问什么原因啊
为什么去掉List.ListIndex = 3 就可以了？
List1.AddItem "357"
List1.AddItem "246"
List1.AddItem "123"
List1.AddItem "456"
Text1.Text = ""
End Sub
Private Sub Command1_Click()
List.ListIndex = 3
Print List.Text1 + Text1.Text
End Sub
程序运行后，在文本框中输入“789”，然后双击列表框中的“456”，却没什么输出的结果，请问什么原因啊
为什么去掉List.ListIndex = 3 就可以了？
1，如果你要实现的是双击列表框输出结果，所以要把代码写在List1_DblClick()
里面。
2，如果你用代码设置List.ListIndex = 3，List1.Text 并不会自动改变，还是为空，所以你可以写为：List1.list(List.ListIndex )，这样就能引用你的列表框项目了。
你代码写错了，很粗心你。双击的话，这样就可以了
Private Sub Form_Load()
List1.AddItem "357"
List1.AddItem "246"
List1.AddItem "123"
List1.AddItem "456"
Text1.Text = ""
End Sub
Private Sub List1_DblClick()
Print Val(List1.Text) + Val(Text1.Text)
End Sub
双击的时候如果程序里面没有Command1_DBLClick() ,则会自动产生为单击事件Command1_Click() ,建立一个空的Command1_DBLClick() 过可解决双击时不触发单击事件。