列表框并未完全删除项目-Java 学习之路

我有一个表格，商店从checkedlistbox中选择的项目到另一个表单上的列表框 .

'Form2
 Public Sub New(ByVal Citems As List(Of String), ByVal Citems2 As List(Of String))
    InitializeComponent()
    ListBox1.Items.AddRange(Citems.ToArray)
    ListBox2.Items.AddRange(Citems2.ToArray)


 Private Sub Cancel_Click(sender As Object, e As EventArgs) Handles Button2.Click 
'Cancel the form and returns to Form 1

    ListBox1.Items.Clear()
    ListBox1.Refresh()
    ListBox2.Items.Clear()
    ListBox2.Refresh()
    Me.Close()
End Sub

'Form 1
 Dim Citems As New List(Of String)
Dim Citems2 As New List(Of String)


Private Sub btnSubmit_Click(sender As Object, e As EventArgs) Handles btnSubmit.Click
    For Each I As String In CheckedListBox1.CheckedItems
        Citems.Add(I)
    Next

    For Each I As String In CheckedListBox2.CheckedItems
        Citems2.Add(I)
    Next

    Dim SecondForm As New Form2(Citems, Citems2)
    SecondForm.Show()

这是我有的代码，用于清除列表框并关闭表单 . 问题是当它再次打开时，先前选择的项目仍在列表框中 . 如何在不完全关闭应用程序的情况下清除数据？

1 回答

这有效：

Private Sub btnSubmit_Click(sender As Object, e As EventArgs) Handles btnSubmit.Click

 Citems.Clear()
For Each I As String In CheckedListBox1.CheckedItems
        Citems.Add(I)
    Next
Citems2.Clear()
    For Each I As String In CheckedListBox2.CheckedItems
        Citems2.Add(I)

    Next

在添加之前清除列表 . 谢谢您的帮助 .

回复于 2024-05-16T14:46:00+08:00

列表框并未完全删除项目

1 回答

相关问题