VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日: 2007/06/05(Tue) 10:01
投稿者こう
Eメール
URL
タイトルRe^18: データグリッドから削除

Recordset.Filterを使うことにより出来ました。
DIVISION <any '3'にあたる部分をif文で条件付けて
    
mRs.Open StrSQL, mCn, adOpenDynamic, adLockOptimistic, adCmdText
If Text01.Text = "01" Or _
    Text01.Text = "2A" Then  
Else
    mRs.Filter = "DIVISION <= 2"
End If

と言う具合です。昨日までRecordset.Filterを使うことなんて考えてませんでしたが
一気に出来てすごくうれしかったです。
魔界の仮面弁士さんありがとうございました!


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- VBレスキュー(花ちゃん) - - Web Forum -