tagCANDY CGI VBレスキュー(花ちゃん) - MSFlexGridの複数検索(VB6.0) - Visual Basic 6.0 VB2005 VB2010
VB2005用トップページへVBレスキュー(花ちゃん)のトップページVB6.0用のトップページ
MSFlexGridの複数検索(VB6.0)
元に戻る スレッド一覧へ 記事閲覧
このページ内の検索ができます。(AND 検索や OR 検索のような複数のキーワードによる検索はできません。)

MSFlexGridの複数検索(VB6.0) [No.48の個別表示]
     サンプル投稿用掲示板  VB2005 〜 用トップページ  VB6.0 用 トップページ
日時: 2007/09/13 05:37
名前: 花ちゃん

***********************************************************************************
* カテゴリー:[グリッド関係][][]                                                  *
* キーワード:MSHFlexGrid,フレックスグリッド,カスタムソート,複数列,        *
***********************************************************************************

元質問:MSFlexGridの複数検索 - マツモト 2003/03/06-13:33 No.3008

MSFlexGrid1に以下のような値が入っているものがあるとします。
┌───┬─────┬───┬───┐
│AAA│マンション│築3年│3DK│
├───┼─────┼───┼───┤
│BBB│アパート │築8年│3DK│
├───┼─────┼───┼───┤
│CCC│マンション│築5年│2DK│
└───┴─────┴───┴───┘

□マンション (CheckBox1)  □3DK (CheckBox2)
チェックボックスに当てはまる条件を検索し、例えば両方ともチェックしたら
AAAAの行のみをMSFlexGrid2に表示するといったようにしたいのですが。


-----------------------------------------------------------------------------
Re^3: MSFlexGridの複数検索 - 花ちゃん 2003/03/06-21:17 No.3033
-----------------------------------------------------------------------------

Private Sub Command1_Click()
    MSFlexGrid2.Rows = 1
    Dim Ro     As Long
    Dim Co     As Long
    Dim myStr  As String
    Dim N      As Long
    With MSFlexGrid1
        For Ro = .FixedRows To .Rows - 1
            .Row = Ro
            .Col = 0
            .ColSel = .Cols - .FixedCols
            myStr = .Clip
            If InStr(myStr, Text1.Text) > 0 And _
                            InStr(myStr, Text2.Text) > 0 Then
                With MSFlexGrid2
                    .Row = N
                    .AddItem " ", .Row + 1
                    .Row = N + 1
                    .Col = 0
                    .ColSel = .Cols - .FixedCols
                    .Clip = myStr
                    myStr = ""
                    N = N + 1
                End With
            End If
        Next Ro
    End With
End Sub
メンテ

Page: 1 |

 投稿フォーム               スレッド一覧へ
題  名 スレッドをトップへソート
名  前
パスワード (記事メンテ時に使用)
投稿キー (投稿時 投稿キー を入力してください)
コメント

   クッキー保存   
スレッド一覧へ