tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板 [ツリー表示へ]   [Home]
一括表示(VB6.0)
タイトルコードの読み込み順に条件をつけたい。
記事No12681
投稿日: 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を読み込みます。
情報が足りなければ補足します。お願いします。

[ツリー表示へ]
タイトルRe: コードの読み込み順に条件をつけたい。
記事No12682
投稿日: 2008/07/03(Thu) 11:11
投稿者いな
・コンボボックスAを使う時とは?
・コンボボックスBを使う時とは?

それぞれ条件をなど明確にしてみるといいかも・・・。

例えば、項目が選択された→クリックされた
→ならばクリックイベントで判断

[ツリー表示へ]
タイトルRe^2: コードの読み込み順に条件をつけたい。
記事No12683
投稿日: 2008/07/03(Thu) 11:44
投稿者てつ
試行錯誤しながら張り付きです・・。

クリックイベントの件なのですが、1つのプロシージャ内で
「クリック」した!。というイベントを取得できるのでしょうか?

また、どの辺りの事を学習すれば理解できるようになるか
あればでいいですが、教えてください。

[ツリー表示へ]
タイトルRe^3: コードの読み込み順に条件をつけたい。
記事No12685
投稿日: 2008/07/03(Thu) 12:49
投稿者いな
> クリックイベントの件なのですが、1つのプロシージャ内で
> 「クリック」した!。というイベントを取得できるのでしょうか?

一番簡単に難しく考えず、やる方法としては
ちょっと頭をやわらかぁ〜くしてみよう。

1つのプロシージャの名前を、Rendoとして

Aのコンボがクリックされた時、
Private Sub A_Clic()
   Call Rendo("A")
End Sub
Bのコンボがクリックされた時、
Private Sub B_Click()
   Call Rendo("B")
End Sub
としてみたら、
判別は引数で出来るよね?

[ツリー表示へ]
タイトルRe^4: コードの読み込み順に条件をつけたい。
記事No12689
投稿日: 2008/07/03(Thu) 16:16
投稿者てつ
ありがとうございました。

助かりました。少し頭をやわらかーくしてみます・・。

[ツリー表示へ]