• 作品一覧
• 新規投稿
• キーワード検索
• 管理ページ
• ログインされていません
  

csvをグルーピング

作品のプログラム

メイン画面を表示する
待機する

メイン画面とは
　　ウィンドウを継承する
　　+データ
　　はじめの手順
　　　　初期化する
　　終わり
　　初期化する手順
　　　　初期化開始する
　　　　　　ボタン1というボタンを作る
　　　　　　ボタン2というボタンを作る
　　　　　　ボタン3というボタンを作る
　　　　　　ボタン4というボタンを作る
　　　　　　この実質大きさは{928, 542}
　　　　　　この内容は「eki.csv」
　　　　　　この文字色は「標準の文字」
　　　　　　この間隔は{4, 4, 4, 4}
　　　　　　表部品1という表部品を作る
　　　　　　表部品1を初期化開始する
　　　　　　　　その位置と大きさは{18, 22, 592, 262}
　　　　　　　　その列見出し高さは、27
　　　　　　　　その移動順は、1
　　　　　　　　その文字色は「標準の文字」
　　　　　　　　その位置固定方向は「上+下+左+右」
　　　　　　　　その間隔は{4, 4, 4, 4}
　　　　　　表部品1を初期化終了する
　　　　　　ボタン1を使う
　　　　　　　　その位置と大きさは{683, 59, 93, 28}
　　　　　　　　その内容は「開業ソート」
　　　　　　　　その移動順は0
　　　　　　ボタン2を使う
　　　　　　　　その位置と大きさは{683, 101, 93, 28}
　　　　　　　　その内容は「県ソート」
　　　　　　　　その移動順は1
　　　　　　ボタン3を使う
　　　　　　　　その位置と大きさは{683, 141, 193, 28}
　　　　　　　　その内容は「開業の日付で駅を分けてhtml」
　　　　　　　　その移動順は2
　　　　　　ボタン4を使う
　　　　　　　　その位置と大きさは{683, 181, 93, 28}
　　　　　　　　その内容は「html表示する」
　　　　　　　　その移動順は3
　　　　　　テキスト領域１というテキスト領域を作る
　　　　　　　　その位置と大きさを{15, 332, 698, 205｝に変える
　　　　初期化終了する
　　　　この設計スケール比率は{104, 104}
　　終わり
　　開いた時の手順
　　　　ファイル名は「eki.csv」
　　　　データ表を作ってデータとする
　　　　データの見出し行は、真　　
　　　　ファイル名というファイルが存在するなら、データへファイル名から読み込む
　　　　表部品1のデータ表をデータに変える
　　終わり
　　ボタン1がクリックされた時の手順
　　　　表部品1の７列目を昇順に並べ替える
　　終わり
　　ボタン2がクリックされた時の手順
　　　　表部品1の６列目を昇順に並べ替える
　　終わり
　　ボタン３がクリックされた時の手順
　　　　テキスト領域１の内容は、　「<table></tr>」　＆　改行
　　　　vは、「」
　　　　(データの一覧の個数 - 1)回，iに１からカウントしながら繰り返す
　　　　　　要素1は、データの一覧(i)　　
　　　　　　要素2は、データの一覧(i + 1)　　
　　　　　　要素1(７) と要素２(７)が等しいなら　　　　
　　　　　　　　vは、ｖ　＆　「<a href="https://ja.wikipedia.org/wiki/[要素１（１）]駅"　" target="_blank">[要素１（１）]駅</a>」　＆　「、」
　　　　　　そうでなければ
　　　　　　　　vは、ｖ　＆　「<a href="https://ja.wikipedia.org/wiki/[要素１（１）]駅"　" target="_blank">[要素１（１）]駅</a>」　＆　「、」
　　　　　　　　テキスト領域１の内容は、テキスト領域１の内容　＆　 「<tr><td>[要素1(７) ]</td><td>[v]</td>」　＆　改行
　　　　　　　　vは、「」
　　　　　　そして
　　　　そして
　　　　テキスト領域１の内容は、テキスト領域１の内容　＆　 「</table>」　＆　改行
　　終わり
　　ボタン4がクリックされた時の手順
　　　　ファイル名は「[デスクトップ]eki.html」
　　　　内容hは、テキスト領域１の内容
　　　　内容hをファイル名へ保存する
　　　　COM_shellというCOM型(「Shell.Application」）を作る
　　　　shellは、COM_shellからインスタンスを作ったもの
　　　　shell:ShellExecute(「file:///[デスクトップ]eki.html」)
　　終わり
終わり