データグリッドのセルにワンクリックで定数を挿入するには？ (ID:110175)

名前

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

本文 VB6＆ACCESSでDataGridにマスタを表示しているのですが、その参照したマスタの右の列に規定値であらかじめYESという文字列を表示して、ワンクリックするとNOという文字列を表示して、またワンクリックするとYesと繰り返して選択させるようなものをつくりたいのですが、うまくできません。 If DataGrid1.Text = "Yes" Then DataGrid1.Text = "No" ElseIf DataGrid1.Text = "No" Then DataGrid1.Text = "Yes" End If End If こんな感じでできると思ったのですが、うまくいきません。ちなみにセルの位置の特定はDataGrid1.colやrowを使用して変数に格納してそれを上のコードに混ぜてやったのですが、うまくできません。どううまくいかないかというと、確かにデータは変更されるのですが、表示の方に問題があって、セルを移動したり、ダブルクリックするまで反応しないのです。 更新クエリーを使っても試しましたが、結果は同じです。データは変更されるのですが、他のセルに移動するまで反映されません。それではユーザは全く逆の値をいれて、セル移動後に間違いに気づくようになってしまうので困っています。どなたか、良い方法があったら教えてください。お願いします。