2012年8月14日火曜日

vb2008で開かれているフォームを取得する

vb2008にてアクティブでないフォームの属性やプロシージャを使いたいことがあるかもしれません。
そんな時My.Application.OpenFormsを使うと開いているフォームを参照できます。
詳しくはこちら


 For Each frm As Form In My.Application.OpenForms
            If Not frm.name = "KWGTYPE" Then
                frm.close()
            End If
 Next

上記のようにすればアクティブでないフォームから条件で選別して閉じることもできます。
間違ってたらおしえてくだしぁ^^

0 件のコメント:

コメントを投稿