いつもお世話になっています。
フォーム上に配置されている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
こんな感じ?
感激です。
ありがとうございますぅーーーー
ツイート | ![]() |