java文件删除选择框,从列表框中删除文件

我正在为照片浏览器做一些应用 . 但我有两个问题：

现在我看到了所有文件，但是ComboBox1上应该只有一个名字的文件 . 如何修改我的代码来实现这一目标 .

第二：ListBox中文件的名称是相同的，文件的数量是corect但nema是同样的：lbxPliki，我该如何更改？

我为Button和ListBox创建了这个代码：

Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click

Dim dlgOtworz As New FolderBrowserDialog

dlgOtworz.ShowNewFolderButton = False

lbxPliki.Items.Clear()

Me.Text = "Przeglądarka"

If dlgOtworz.ShowDialog = Windows.Forms.DialogResult.OK Then

Folder = dlgOtworz.SelectedPath

Dim plik As FileInfo

Dim katalog As New DirectoryInfo(dlgOtworz.SelectedPath)

listaP = katalog.GetFiles("*.jpg")

If listaP.Length < 1 Then

MessageBox.Show("W wybranym folderze brak JPG", "Uwaga", MessageBoxButtons.OK, MessageBoxIcon.Information)

Else

For Each plik In listaP

lbxPliki.Items.Add(lbxPliki.Name)

Next

End If

End If

End Sub

Private Sub lbxPliki_SelectedIndexChanged(sender As Object, e As EventArgs) Handles lbxPliki.SelectedIndexChanged

If lbxPliki.Items.Count > 0 Then

Dim PlikO As String

PlikO = listaP(lbxPliki.SelectedIndex).ToString

Try

pbxObraz.Image = Image.FromFile(Folder & "\" & listaP(lbxPliki.SelectedIndex).ToString)

Me.Text = "Przeglądarka - " & PlikO

Catch blad As Exception

MessageBox.Show("Błąd", "Bą'ad", MessageBoxButtons.OK, MessageBoxIcon.Error)

End Try

End If

For i = 1 To 2

lbxPliki.SelectedIndex = 0

If lbxPliki.SelectedIndex = ComboBox1.Text Then

MsgBox("OK")

Else : MsgBox("B")

End If

Next

End Sub

结束类