ソリュージョン内のフォームを行き来したい (ID:145527)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 ？？？？？ 特攻隊長まるるうさん・・・ すみません、？を出さなければならないほどわかりません。初心者掲示板のほうで検索したのですが・・・それでもわからないのです。 出されたコードを貼り付けてみると型が定義されていない、とエラーが出て、Form1にすべてのコードを記述するとボタンが機能しないのです。 Public Event FormChange(ByRef sender As Form, ByVal TargetFormNum As Class1.FormsNum) Public Event ExitThread() のClass1.FormsNumと、 Private mForms As ArrayList Private mClosingCancel As Boolean Private Sub New() Dim F1 As New Form1 'プログラム起動時に全てのインスタンス生成 Dim F2 As New Form2 Dim F3 As New Form3 'プログラム終了イベント AddHandler F1.ExitThread, AddressOf Form_ExitThread AddHandler F2.ExitThread, AddressOf Form_ExitThread AddHandler F3.ExitThread, AddressOf Form_ExitThread '表示フォーム変更イベント AddHandler F1.FormChange, AddressOf Form_FormChange AddHandler F2.FormChange, AddressOf Form_FormChange AddHandler F3.FormChange, AddressOf Form_FormChange 'Closing イベント AddHandler F1.Closing, AddressOf Form_Closing AddHandler F2.Closing, AddressOf Form_Closing AddHandler F3.Closing, AddressOf Form_Closing Me.mForms = New ArrayList(New Form() {F1, F2, F3}) Me.mClosingCancel = True F1.Show() End Sub のForm1,2,3でエラーになります。 せっかく過去ログのコードも出していただいてアドバイスももらったのに、１００％中１０％程度しかわかりません。・・・。 コードは別々のプロジェクト内に記述？１つのプロジェクトに収める？Sub Mainのフォームから別のフォームに飛ぶ記述は？難しい・・・