爱满家园我的小手印:请问vb中如何能让列表框里的条目改变次序，使其能上下移动

来源：百度文库 编辑：中科新闻网 时间：2024/05/10 00:48:47
悬赏20

建立两个CommandButton，将他们设为数组，然后：
Private Sub Command1_Click(Index As Integer)
On Error GoTo handle
With List1
For i = 0 To List1.ListCount - 1
If .Selected(i) Then
If Index = 0 Then
.AddItem List1.List(i), i - 1
.RemoveItem i + 1
.Selected(i - 1) = True
Else
.AddItem List1.List(i), i + 2
.RemoveItem i
.Selected(i + 1) = True
End If
Exit For
End If
Next
End With
handle: Exit Sub
End Sub

删除列表框的指定项目
list1.removeitem index
添加项目
list1.additem "要加的项目名",index

index为列表框中项目的标号
第一个项目为0，其他的以此类推

有了上面两个方法，再加上你的聪明才智
相信一定会解决这个问题的
有什么问题再联系我吧~

请问vb中如何能让列表框里的条目改变次序，使其能上下移动 VB中向ADO数据库里添加记录的时候，如何让TextBox中显示列表中的数据？ dreamweaver中,如何改变元件的叠放次序? VB6中如何改变一些对象的叠放次序？ vb 中如何能把数据库中一列的数据提取到控件列表框中的呢？ 请问网球中如何确定双打的发球次序？ 在VB中如何让TEXT1里的内容全选 如何去掉百度搜索框里的搜索条目 如何清除搜索引擎输入框里的历史搜索条目？ VB中，如何获取(根)菜单的名字列表？