フォームありのソリューションにて、下記のフォーム起動方法を Public Class Program <STAThread()> _ Shared Sub Main(ByVal CmdArgs() As String) ・・・・ Application.Run(New ClassName(param)) ・・・・ end sub end class
Public Class ClassName Public Sub New(ByVal param As string) 処理 End Sub End Class