TextBoxなのかListBox、ComboBoxなのかの判断の仕方

解決

---

いつもお世話になっています。
フォーム上に配置されているTextBoxのみに値をセットしたいのですが、
TextBoxなのかListBox、ComboBoxなのかの判断の仕方を教えてください。
お願いします。

With Form1
  For Each Control In Form1.Controls
  
     Form1上に存在するTextBoxにのみ値をセットしたい。
     
  Next
End With

編集 削除

---

Dim Ctl As Control
  With Form1
    For Each Ctl In Form1.Controls
      If TypeName(Ctl) = "TextBox" Then Ctl.Text = "aaa"
    Next Ctl
  End With

こんな感じ？

編集 削除

---

感激です。
ありがとうございますぅーーーー

編集 削除

---

名前

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

本文

←解決時は質問者本人がここをチェックしてください。