視覺基本文本框列表框

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