Question

我在我的项目中制作了2个表格。但我想让第一个表单输入一个输入，作为第二个表单，它可以显示输出。问题是，我已使用文本框输入所有输入，但输出无法使用列表框以第二种形式显示。

Answer 1

您可以在第二个表单上创建一个公共方法，并从您的第一个表单中调用它。我用TextBox创建了两个Form，另一个用ListBox创建了一个，如果你想要更多细节，你需要举例说明你遇到的问题。

<强> 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

视觉基本文本框列表框

1 个答案: