Question

VB里怎样实现点击一个命令按钮就使Filelistbox里的第一个文件被选中

VB里怎样实现点击一个命令按钮就使Filelistbox里的第一个文件被选中，点击另一个按钮使被选中的文件向下移动一个？求大神指点代码怎么写。

Answer 1

这个简单：
Private Sub Command1_Click() '单击则选中第一个文件
File1.ListIndex = 0
End Sub

Private Sub Command2_Click() '单击则选中下一个文件，到最后一个文件后若单击则转到第一个文件
If File1.ListIndex < File1.ListCount - 1 Then
File1.ListIndex = File1.ListIndex + 1
Else
File1.ListIndex = 0
End If
End Sub

Private Sub Command3_Click() '单击则选中最后一个文件
File1.ListIndex = File1.ListCount - 1
End Sub

Answer 2

File1.ListIndex = 0
filelistbox 是排序的 无法自定义位置

追问

那怎样使filelistbox里的最后一个文件被选中呢？上边另一个问题表述的有点不清楚，我的意思是怎样实现点击另一个按钮与该文件相邻的下一个文件就被选中？