第14講 数独の自動生成
第５話 ブロックの条件を付け加えるには？その１
　　　　If gx > 0 Then
　　　　　　For j = 0 To gx - 1
　　　　　　　　If i = a(gy, j) Then GoTo tobi
　　　　　　Next
　　　　End If
　　　　If gy > 0 Then
　　　　　　For j = 0 To gy - 1
　　　　　　　　If i = a(j, gx) Then GoTo tobi
　　　　　　Next
　　　　End If
　　　　a(gy, gx) = i
行と列の重複検査は簡単でした。
２次元配列にした効果よって、簡単に実現したわけです。

ブロック内で重複しないようにするには、
どうしたらよいでしょうか。
ブロック内重複試験が難しい理由は、
例えば、

１８との重複を調べるには、
０，１，２，９，１０，１１
と重なりを考えなければなりませんし、

６７であれば、
５７，５８，５９，６６
との重複を調べなければなりません。
プログラムを組む場合には、
常に汎用性＝普遍性を考えなければなりません。
個別対応では、よいプログラムとはいえません。
下手をすると、81通りの対応になってしまいます。

もし、７７であれば
For i = 6 To 8
　　 For j = 3 To 5
　　　　　・・・・
　　 Next
Next
のようにすればよいわけですが、
６７の場合のfor文はどうなりますか。
悩んでしまいますね。
それに、
For i = 6 To 8
　　 For j = 3 To 5
　　　　　・・・・
　　 Next
Next
であってもやはり個別対応に近いでしょう。。
９つのブロックがあるわけですから、
９のパターンが出来てしまいます。
81通りから９通りですから大躍進には違いありませんが。
やはり、for文は
For i = □ To □+2
　　 For j = △ To △+2
　　　　　・・・・
　　 Next
Next
の1つで済ませたいところです。
どうです。
予想したより困難な課題であると感じてきたのではありませんか。

第４話へ　第６話へ

eclipse c++ 入門
魔方陣 数独で学ぶ VBA 入門
数独のシンプルな解き方・簡単な解法の研究
vc++講義へ
excel 2013 2010 2007 vba入門へ
ＶＢ講義基礎へ
初心者のための世界で一番わかりやすいVisual C++入門基礎講座へ
初心者のための世界で一番わかりやすいVisual Basic入門基礎講座へ
専門用語なしの C言語 C++ 入門（Visual C++ 2010で学ぶ C言語 C++ 入門）
専門用語なしの excel vba マクロ 入門 2013 2010 2007 対応講義 第1部
eclipse java 入門へ
excel 2016 vba 入門へ
小学生からエンジニアまでのRuby入門へ
本サイトトップへ