问题:[问答题]
[操作步骤]
第1步:打开本题工程文件。
第2步:分析并编写程序。
第3步:保存、调试、运行程序。
[1]step-1[2]List1.List(k)[3]k[4]Text1或Text1.Text
● 参考解析
列表框控件有两个重要的属性——Selected属性和List属性,二者都是数组,从0开始编号。Selected下标与List的下标一一对应,记录List数组中各个项目是否被选中。例如,若列表框List1中的第二个元素即List(1)被选中,则Selected(1)的值就为True;相反,若List(1)未被选中,则Selected(1)的值就为False。运行时,对Selected数组的下标从0~ListCount-1依次检测,可以判断出所有被选择的项目。由于题目中要对被选的项目进行移出操作,移出一个项目后,后续项目自动前移,该项目后的其他项目的下标发生改变,对被选项目的定位就出现错误。为了解决这个问题,程序在循环时下标从ListCount-1~0进行检测,此时For循环步长应为-1。当List1.Selected(k)值为真时,对应被选中的项目就是List1.List(k),应该把它添加到List2中,同时在List1中把下标为k的项目移去。为了在文本框中把List2中所有的项目连接起来,应该是取文本框中原有的值Text1.Text连接上List2的项目。