コントロールの存在確認 への返答

投稿で使用できる特殊コードの説明。(別タブで開きます。)
本名は入力しないようにしましょう。
投稿した後で削除するときに使うパスワードです。返答があった後は削除できません。
返答する人が目安にします。相手が小学生か社会人かで返答の仕方も変わります。
最初の投稿が質問の場合、質問者が解決時にチェックしてください。(以降も追加書き込み・返信は可能です。)
※「過去ログ」について書くときはその過去ログのURLも書いてください。

以下の返答は逆順(新しい順)に並んでいます。

投稿者 xvmmtnk  (中学生) 投稿日時 2011/5/9 12:01:47
回答してくださったみなさんありがとうございます。
shuさんの方法でうまくいきました。
本当にありがとうございました。
0
投稿者 shu  (社会人) 投稿日時 2011/5/2 11:03:37
Dim lstBrws = TabControl1.SelectedTab.Controls.OfType(of WebBrowser)
if lstBrws.count>0 then
end if

OfTypeが使えるバージョンならこんなんでどうでしょう？（未検証）
0
投稿者 るきお  (社会人) 投稿日時 2011/4/30 23:58:34
Controls.Containsの引数には文字列ではなくコントロールそのものを渡します。
    
If TabControl1.SelectedTab.Controls.Contains(WebBrowser1) Then

    MsgBox("SelectedTabはWebBrowser1を含んでいます。")

End If
0
投稿者 ぺぺたろう  (中学生) 投稿日時 2011/4/30 20:01:41
.Item(0)を消してみればどうでしょう？
0
投稿者 xvmmtnk  (中学生) 投稿日時 2011/4/30 18:38:08
試したコードはこれです。
If TabControl1.SelectedTab.Control.Item(0).Contains("WebBrowser")

End If
0
投稿者 xvmmtnk  (中学生) 投稿日時 2011/4/30 18:35:39 
CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser)

で、コントロールの存在確認をしたいのですが、上記のページで試しても、エラーがでて出来ません。
どうすれば良いのですか? 教えてください。
0