ClassLibrary - Form.Show

Imports WindowsApplication1
Public Class Form1
    Dim test As New test
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        test.show(Form2)
    End Sub
End Class

Public Class test
    Public Sub show(form As Form)
        form.Show()
    End Sub
End Class

Imports System.Windows.Forms
Public Class Class1

    Shared Fm As Form = New Form

    Public Shared Function DllMain(ByVal arg As String) As Integer
        Dim _Thread As System.Threading.Thread = New System.Threading.Thread(AddressOf Main)
        _Thread.Start()
        Return 0
    End Function

    Shared Sub Main()
        Fm.Text = "Test Form"
        Application.Run(Fm)
    End Sub

End Class