tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
[ツリー表示へ]  [ワード検索]  [Home]

タイトル コードの読み込み順に条件をつけたい。
投稿日: 2008/07/03(Thu) 09:18
投稿者てつ
はじめまして、よろしくお願いします。
開発環境はVB6.0です。

OraDynaset.MoveFirst
pvArrayDB.ReDim 0, lngReccnt - 1, 0, COL_MAX - 1
lngRow = 0
lngSetRow = 0
blnFlg = False
Do Until OraDynaset.EOF
pvArrayDB(lngRow, 0) = Format(objFLDS(0).Value, "###")
pvArrayDB(lngRow, 1) = Format(objFLDS(1).Value, "###")
pvArrayDB(lngRow, 2) = objFLDS(2).Value
pvArrayDB(lngRow, 3) = Format(objFLDS(3).Value, "0")
pvArrayDB(lngRow, 4) = Format(objFLDS(4).Value, "###")


'''コードとグリッドの連動(コンボボックスAライン)''''''''''''''''''''''''''''''''
If (Me.lblUny_cd2.Caption = objFLDS(0).Value) And (blnFlg = False) Then
lngSetRow = lngRow
blnFlg = True
End If

'''グリッドの連動(コンボボックスBライン)''''''''''''''''''''''''''''''''''''''
If (Me.lblRkun_cd2.Caption = objFLDS(1).Value) And (blnFlg = False) Then
lngSetRow = lngRow
blnFlg = True
End If

コンボボックス A B があります。コンボボックスAを使う時には、Aラインをのみを読み
コンボボックスBを使う時には、Bラインのみを読みたいのですが、何か良い方法ありませんか?

最初に必ずAを読み込みます。
情報が足りなければ補足します。お願いします。

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

古いスレッドにレスはつけられません。