The last one gave me errors:
Dim frm As New Form2(me)

It wouldn't except the 'me'
it means that you have not made the required changes in form2.