Public Sub New(ByVal dtauswahl As DataTable, ByVal parentcontrol As Object)
        MyBase.New()
        strreturncol = returncol
        dtchoosedata = dtauswahl
 
        MyBase.Location = New System.Drawing.Point(CType(parentcontrol, _
          System.Windows.Forms.TextBox).Left, CType(parentcontrol, _
          System.Windows.Forms.TextBox).Top + CType(parentcontrol, _
          System.Windows.Forms.TextBox).Height)
        MyBase.Name = "Panel3"
        datagrid2.DataSource = choosedata
        MyBase.Size = New System.Drawing.Size(504, 376)
        Visible = False
    End Sub