条件指定に関して (ID:148008)

名前

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

本文 環境：Visual Basic 2008 以下のように画面のLoad時にデータテーブルをバインドし、それを表示させるような 事をしていますが、その際に、データベースから読み出してきたデータの内容によって、 表示させたテキストの背景の色を変化させたいと考えています。 尚、DataRepeterを使う為にバインドさせています。 単純にテキストの背景の色を変更する事は簡単ですが、読み込んだデータをバインドさせた 後に条件を付けるという事は可能なのでしょうか？ やりたい事としては、読み込んだ管理番号が、0001番だったら、表示させているテキスト の色を青くしたい という事です。 何度も質問して申し訳ありません。 教えて頂きたいと思います。 よろしくお願いします。 《現在の記述内容》 画面Load時の処理 'データセットにテーブルを追加する dtTable = dtSet.Tables.Add("仕様書_T") 'テーブルにフィールドを追加する '.Add("フィールド名", フィールドの型)で追加します dtTable.Columns.Add("管理番号", Type.GetType("System.String")) dtTable.Columns.Add("受付日チェック", Type.GetType("System.Boolean")) dtTable.Columns.Add("返却日チェック", Type.GetType("System.Boolean")) Dim Connection As New OracleConnection Dim Command As New OracleCommand Try 'Oracleへのコネクションの確立 Connection.ConnectionString = "User Id=XXXXXX; Password=999999; Data Source=XE" 'オープン 'Connection.Open() 'コマンド作成 Command.Connection = Connection Try Dim Select_SQL As String 'SQL文作成 Select_SQL = "select 管理番号,受付日チェック,返却日チェック from T_仕様書" Dim adp As New OracleDataAdapter(Select_SQL, Connection) dtSet.Clear() adp.Fill(dtSet, "仕様書_T") TXT_管理番号.DataBindings.Add("Text", "仕様書_T", "管理番号") CHK_G受取日.DataBindings.Add("Checked", "仕様書_T", "受付日チェック") CHK_G返却日.DataBindings.Add("Checked", "仕様書_T", "返却日チェック") 'データソースを連結する BindingSource1.DataSource = dtSet BindingSource1.DataMember = "仕様書_T" DP_仕様書.DataMember = BindingSource1.DataMember DP_仕様書.DataSource = BindingSource1.DataSource Catch ex As Exception ' 例外が発生した時の処理 MsgBox(ex.Message) End Try Catch ex As Exception ' 例外が発生した時の処理 MsgBox(ex.Message) End Try