５．フォーム上のすべてのコントロールのプロパティ値を一度に設定

１．フォーム上のすべてのコントロールのプロパティ値を一度に設定 　　１．すべてのコントロールのBackColorを変更します。　　２．テキストボックスだけBackColorを変更します。 ２．　 ３．　 ４．　 ５．　 ６．

下記プログラムコードに関する補足・注意事項　 動作確認：Windows Vista・Windows 7 (32bit) / VB6.0(SP6) Option　：[Option Explicit] 参照設定：追加なし 使用 API：なし その他　： 　　　　：

１．フォーム上のすべてのコントロールのプロパティ値を一度に設定

Option Explicit　　 'SampleNo=072　WindowsXP VB6.0(SP5) 2002.05.16 Private Sub Command1_Click() 'すべてのコントロールのBackColorを変更します。 　　Dim i As Long 　　'中には無いプロパティもあるのでエラーチェックを 　　On Error Resume Next 　　For i = 0 To Controls.Count - 1 　　　　Controls(i).BackColor = QBColor(12) 　　　　'非表示にする場合 　　　　'Controls(i).Visible = False 　　Next i End Sub Private Sub Command2_Click() 'テキストボックスだけBackColorを変更します。 　　Dim i As Long 　　For i = 0 To Controls.Count - 1 　　　　'Mytype = TypeName(Controls(i)) 　　　　'Debug.Print Controls(i).Name 　　　　If TypeName(Controls(i)) = "TextBox" Then 　　　　　　Controls(i).BackColor = QBColor(14) 　　　　End If 　　Next i End Sub

２．

３．

４．

５．

６．

検索キーワード及びサンプルコードの別名(機能名)

フォーム上の全てのテキストボックスの内容を一度に書き換える　一度に消去する