投稿日 | : 2002/09/18(Wed) 17:22 |
投稿者 | : ゆう(U) |
Eメール | : |
URL | : |
タイトル | : MSFlexGridで検索 |
手順は
1.検索結果表示用のMSFlexGridの初期化
※ここはお好みで設定してください
2.データ行の先頭から最後まで繰り返す
※For Ro = .FixedRows To .Rows - 1
対象のセルが検索対象なら
※ For Co = .FixedCols To .Cols - 1
※ If Text1.Text = .TextMatrix(Ro, Co) Then
対象の行の内容を検索結果へ追加する
※ここで下の2点でデータのコピーをします
列のFor Nextを抜ける
※複数の列が対象になっている場合、1列3列と対象になると
複数の同じデータが追加されるので、列のForを抜けた方が
良いです
3.対象のデータが存在するなら
フォーカスを検索結果のグリッドへ移動する
※基本的なメソッドです、ヘルプで調べてね
でOKですね・・・
行のデータをそのまま追加するには、
「AddItem メソッド」が便利です。
追加内容の取得には・・・
「Clip プロパティ」かな?
「TextMatrix プロパティ」でもOK