VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト]
[新規投稿]
[新着記事]
[ワード検索]
[管理用]
| 投稿日 | ： 2007/03/16(Fri) 21:11 |
| 投稿者 | ： 花ちゃん |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re^7: Formチェック |
> Forms.Countして開いているはずのフォーム数と同じだったら、Loadされている？
> 違いますか？
投稿したコード試して見ましたか？
ヘルプのForms コレクションの解説の抜粋
Forms コレクションを使って、アプリケーションにロードされているすべての
フォームを参照することができます。
使用例も掲載されています。
Form1 に Command1 と Command2 を貼り付け、Form2 を追加して下記のコードを
Form1 にペーストして試して見て下さい。
Option Explicit
Private Sub Command1_Click()
If GetLoadForm("Form2") = True Then
MsgBox "Load されています"
Else
MsgBox "Load されていません"
End If
End Sub
Private Function GetLoadForm(ByVal MyFrm As String) As Boolean
Dim myForm As Form
For Each myForm In Forms
If myForm.Name = MyFrm Then
GetLoadForm = True
End If
Next
End Function
Private Sub Command2_Click()
Form2.Show
End Sub
- 関連一覧ツリー
（★ をクリックするとツリー全体を一括表示します）
- 返信フォーム
（この記事に返信する場合は下記フォームから投稿して下さい）