[リストへもどる]　　　[VBレスキュー(花ちゃん)]
一括表示
投稿時間：2006/10/28(Sat) 06:16
投稿者名：まき
Ｅメール：
ＵＲＬ　：
タイトル：結果を並べて表示させたい
はじめしてVB6でご教授頂けませんか。
テーブル
名前　　　着順
はる　　　１着
なつ　　　２着
あき　　　３着
ふゆ　　　２着
はる　　　２着
なつ　　　３着
はる　　　２着

とありまして、結果をカウントして

名前　　１着　２着　３着
はる　　　１　　２　　０
なつ　　　０　　１　　１
ふゆ　　　０　　１　　０
あき　　　０　　０　　１

と表示させたいのですがどの様な構文で出来るのか
お手数かと思いますが教えていただけませんか？

投稿時間：2006/10/28(Sat) 07:45
投稿者名：花ちゃん
Ｅメール：
ＵＲＬ　：
タイトル：Re: 結果を並べて表示させたい
> テーブル
テーブル とは、何の、元々のデータはどのようなものですか？
その他、条件等(並び替えるとか、表示方法等)があるなら詳しく書かないと...。

投稿時間：2006/10/28(Sat) 08:28
投稿者名：まき
Ｅメール：
ＵＲＬ　：
タイトル：Re^2: 結果を並べて表示させたい
> > テーブル
> テーブル とは、何の、元々のデータはどのようなものですか？
> その他、条件等(並び替えるとか、表示方法等)があるなら詳しく書かないと...。

大変失礼しました。初心者でしてどの様に質問していいかも少しわからなくて
テーブルはアクセスで作成しておます。
条件は着順を1着、2着、3着のそれぞれをカウントし
１着の多い順、同じ回数の場合は２着の多い順・・・に表示させるSQL文が分かりません。

投稿時間：2006/10/31(Tue) 14:31
投稿者名：琴
Ｅメール：
ＵＲＬ　：
タイトル：Re^3: 結果を並べて表示させたい
Accessで適当かつ強引に作ってみましたがこんな感じでしょうか？

SELECT T_00.名前,
       IIf(IsNull(T_01.順位１), "0", T_01.順位１) As １着,
       IIf(IsNull(T_02.順位２), "0", T_02.順位２) As ２着,
       IIf(IsNull(T_03.順位３), "0", T_03.順位３) As ３着
FROM (([SELECT テーブル.名前
       FROM テーブル
       GROUP BY テーブル.名前]. AS T_00
LEFT JOIN [SELECT テーブル.名前, Count(テーブル.順位) AS 順位１
          FROM テーブル
          WHERE (((テーブル.順位) = "１着"))
          GROUP BY テーブル.名前]. AS T_01 ON T_00.名前 = T_01.名前)
LEFT JOIN [SELECT テーブル.名前, Count(テーブル.順位) AS 順位２
          FROM テーブル
          WHERE (((テーブル.順位) = "２着"))
          GROUP BY テーブル.名前]. AS T_02 ON T_00.名前 = T_02.名前)
LEFT JOIN [SELECT テーブル.名前, Count(テーブル.順位) AS 順位３
          FROM テーブル
          WHERE (((テーブル.順位) = "３着"))
          GROUP BY テーブル.名前]. AS T_03 ON T_00.名前 = T_03.名前
ORDER BY T_01.順位１ DESC , T_02.順位２ DESC , T_03.順位３ DESC;

Accessのクエリ作成で作ったものなので、プログラムから利用する際は
若干の修正が必要になるかもしれません。

結果は以下の様になります。

名前    １着    ２着    ３着
はる    1    2    0
なつ    0    1    1
ふゆ    0    1    0
あき    0    0    1