タイトル : Re^5: タイプによって別ける必要があるのでしょうか? 投稿日 : 2007/09/30(Sun) 09:02 投稿者 : びぎ
おはようございます。 早速試してみました。 Dim Textbox As TextBoxBase Select Case True Case TypeOf cldControl Is TextBoxBase Textbox = DirectCast(cldControl, TextBoxBase) Textbox.ReadOnly = pReadFlg Case TypeOf cldControl Is RadioButton RadioButton = DirectCast(cldControl, RadioButton) RadioButton.AutoCheck = pReadFlg End Select でokでした。 もしチェックボックスがあった場合 この場合もAutoCheckでラジオボタンとおなじなのですが この場合は分けるのですよね。 |