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

投稿日： 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

- 関連一覧ツリー （★ をクリックするとツリー全体を一括表示します）
- 返信フォーム （この記事に返信する場合は下記フォームから投稿して下さい）

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