■ 久々にプログラム 2010年01月16日（土） 会社では、同じフロアの他部署の顧客管理システムを作っていたりしていたので、エクセルVBAのプログラムはそこそこ作っていた。 だからそんなに腕は落ちていないだろうと思い、久々に夢のあるプログラムを作ってみた。 その名も「ロト６が当たるまで」。 要は、購入したロト６の抽選番号を入力し、それをPCがランダムにチョイスした数字と比較。 ６個すべての数字が一致、つまり１等当選と同じ状態になるまで、何回かかったかをカウントする仕組みだ。 ちなみに、今プログラムを走らせて見たら、541万6473回目にHITした。 何回か走らせてるけど、これはなかなか良い成績のたぐいだ。 理論上の抽選確率とは一致しないのだろうが、いかに当たらない物かが良く解る。 結局、夢のないプログラムになってしまった。 チャンチャン。