Public Class selectmasterlist Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click masterlist.Show() privmasterlis() Me.Close() End Sub Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click masterlist2.Show() privmasterlis() Me.Close() End Sub Private Sub selectsummary_Load(sender As Object, e As EventArgs) Handles MyBase.Load End Sub End Class