请问这段代码有什么问题？
 Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        Dim x As Integer
        Dim i As Integer
        x = ListBox1.Items.Count
        For i = 0 To x-1
            ListBox1.Items.RemoveAt(i)
        Next


    End Sub


[ 本帖最后由 maxdison 于 2010-4-15 22:25 编辑 ]

创了~，这是其中一小段

[ 本帖最后由 maxdison 于 2010-4-15 22:26 编辑 ]