Visual Basic文本框转换为列表框

Question

我在我的项目中制作了两个表单。但是我想让第一个表单输入内容，第二个表单可以显示输出结果。问题在于，我已经使用文本框输入了所有的内容，但是输出结果无法通过列表框在第二个表单中显示。

- noooooooooooooo

---

你能展示一下那段不起作用的代码吗？ - Jeremy Thompson

Answer 1

你可以在第二个窗体上创建一个公共方法，并从第一个窗体中调用它。 我创建了两个窗体，一个带有文本框，另一个带有列表框，如果您需要更多细节，请举例说明您遇到的问题。 Form1

Public Class Form1
    Dim frm2 As Form2
    Private Sub TextBox1_KeyPress(sender As System.Object, e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
        Dim tb As TextBox = CType(sender, TextBox)
        If e.KeyChar = vbCr Then
            If tb.Text.Length > 0 Then
                frm2.ListBoxAdd(tb.Text)
                tb.Text = ""
                e.Handled = True
            End If
        End If
    End Sub

    Public Sub New()

        InitializeComponent()
        frm2 = New Form2
        frm2.Show(Me)
    End Sub
End Class

表格2

Public Class Form2
    Public Sub ListBoxAdd(data As String)
        ListBox1.Items.Add(data)
    End Sub
End Class

- Mark Hall