[asemshahen5]

PHP كود :

   Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Dim frm As New Form2
        Dim arr As New ArrayList
        arr.Clear()
        arr.AddRange(ListBox1.Items)
        frm.ListBox1.Items.AddRange(arr.ToArray)
        frm.Show()
    End Sub