>>319
そういう場合はForm1_Loadに書かず、コンストラクタに書くんだ。
Form1の「Windows フォーム デザイナで生成されたコード」ってとこ展開して、
Newメソッドの中の「InitializeComponent() 呼び出しの後に初期化を追加します。」ってとこ。
それから、
Public Sub Main()
　　Dim objForm1 As New Form1
　　objForm1.P = 317
　　Application.Run(objForm1)
End Sub
でＯＫ