Question

我不确定是否可行，但我想知道是否可以通过在不使用按钮事件或某种类型的点击事件的情况下将该文本键入文本框来添加或删除文本来更新列表框。我已经尝试过使用text_changed事件，但它会在我输入时插入文本，因此我无法输入整个字符串，然后将其作为整个字符串移动到列表框中。

我要做的是通过读卡器扫描磁性身份证，并将该卡中的数据插入列表框，当我再次扫描同一张卡时，它将删除数据。这适用于员工日志记录系统。

感谢。

Answer 1

使用以下代码，如果您在TextBox1中键入字符串并按Enter键，我们会检查该字符串是否已存在于ListBox1中。如果是这样，则从ListBox中删除该字符串，否则添加该字符串。然后TextBox1被清除。

Private Sub TextBox1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox1.KeyPress
    If e.KeyChar = vbCr Then
        If ListBox1.Items.Contains(TextBox1.Text) Then
            ListBox1.Items.Remove(TextBox1.Text)
        Else
            ListBox1.Items.Add(TextBox1.Text)
        End If
        TextBox1.Clear()
        e.Handled = True
    End If
End Sub

从文本框中填充列表框，而不使用VB中的按钮或单击事件

1 个答案: