问题 问答题

在窗体上建立一个名称为List1的列表框和一个名为Text1的文本框。编写程序,实现列表框和文本框中项目的交换。要求List1中的项目按字母升序排列,Text1中的项目按照加人的先后顺序排列。当双击List1某个项目时,该项目从列表框中消失,并出现在Text1中。程序运行时的窗体界面如图2-3所示。

答案

参考答案:本题主要考查列茅,框控件的使用。   列表框控件用于显示可供单一或多个选择的列表项。。给列表框添加列表项既可以在设计阶段通过其List属性设置加入(注意每输入完一项后按Ctrl+Enter键换行再输入下一项),也可以在程序运行时通过代码:列表框名.Addhem“项目”加入;List(Index)属性用于设置或返回指定索引号的列表项的内容;ListIn dex属性用于设置或返回刈表框中当前所选列表项的索引号;Sorted属性用于设置或返回列表框中的列表项是否按字母顺序排序,值为True时保持排序;RemoveItem方法用于删除指定索引号的列表项。   根据题意,新建“标准EXE”工程,将一个List控件和一个文本框控件添加到窗体上,列表框的名称为List1,List属性加入以下项“AAAAA”、“BBBBB”、“CCCCC”、“DDDDD”、“11111”、“22222”、“33333”和“44444”,文本框的名称为Text1、MuhiLine属性为True、ScrollBar属性为2。双击List1进入代码编写窗口,补充后的具体代码如一:   Private Sub List1_DbtClick()    Text1.Text=Text1.Text+Listl.List(List1.ListIndex)+vbCrLf ’将选中的项加到Text1中显 示    List1.Removehem List1.Listlndex’删除选中项   End Sub   单击 按钮运行程序,并按要求保存。

单项选择题
单项选择题