Dim filename As String If ListBox1.SelectedItem Is Nothing Then Exit Sub End If filename = ListBox1.SelectedItem.ToString ListBox1.Items.Remove(ListBox1.SelectedItem) My.Computer.FileSystem.DeleteFile("C:\" & filename & ".txt")
List1.SelectedItem.ToString
Dim filename As String If ListBox1.SelectedItem Is Nothing Then Exit Sub End If filename = ListBox1.SelectedItem.ToString ListBox1.Items.Remove(ListBox1.SelectedItem) My.Computer.FileSystem.DeleteFile("C:\" & filename)
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question