以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]选中刚添加的列表项 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=117135) |
-- 作者:天一生水 -- 发布时间:2018/4/7 14:27:00 -- [求助]选中刚添加的列表项 如图,通过拖拽将图片放入左边的列表框,点击列表框的值,右边图片控件显示相应的图片。 当列表框添加值之后,怎样自动选中刚添加的项(就是不用再点击就变成选中状态) 谢谢! 1、选中列表项,代码不知道对不对,也不知道往哪里放? Dim lst As WinForm.ListBox lst = e.Form.Controls("ListBox1") For i As Integer = 0 To lst.Items.Count - 1 lst.SelectedIndex = lst.Items.Count -1 ’最后一项 Next 2、PictureBox显示图片 Dim pbx As WinForm.PictureBox = e.Form.Controls("照片") pbx.ImageFile = e.form.controls("ListBox1").Selectedvalue |
-- 作者:有点蓝 -- 发布时间:2018/4/7 14:50:00 -- 不需要循环 Dim lst As WinForm.ListBox lst = e.Form.Controls("ListBox1") lst.SelectedIndex = lst.Items.Count -1 SelectedIndexChanged事件 Dim pbx As WinForm.PictureBox = e.Form.Controls("照片") pbx.ImageFile = e.form.controls("ListBox1").Selectedvalue |