Variant 変数

数独解析にVBA言語を使う利点はいろいろあるが、プログラムする上で、Variant　型のデータ変数の便利さは、よくぞやってくれるという感謝に堪えない。この活用こそ、効率のよい数独の計算や表現を可能にするものであろう。


朝日新聞8月25日掲載　Be　数独夏休み特集の第1問の「次の一手」を掲載します。
といっても、ウオーミング・アップ★★と書いてあるように、大変やさしい問題です。

難易度は最低ですが、「見た目」は6問中最高点の41点でした。こんなに表出数が多いのに、なぜ？と不思議に思われる初心者の方もおられるかも知れませんが、麻雀をされる方ならもうお気付きのように、リャン・ウー・パー（2,5,8）の筋を配したチートイ（7対子）もどきの数字配列は滅多にお眼にかかれるものではありません。　

　次に全手筋51手を示します。表の見方は前回述べた通りです。

1   (3,5)= 1     B1   Block 2

2   (5,3)= 1     B1   Block 4

3   (2,1)= 2     B1   Block 1

4   (6,4)= 2     B1   Block 5

5   (8,9)= 2     B1   Block 9

6   (6,1)= 5     B1   Block 4

7   (8,6)= 5     B1   Block 8

8   (3,8)= 6     B1   Block 3

9   (9,4)= 6     B1   Block 8

10   (4,9)= 7     B1   Block 6

11   (8,2)= 7     B1   Block 7

12   (6,8)= 8     B1   Block 6

13   (7,3)= 2     B2   Block 7

14   (4,2)= 3     B2   Block 4

15   (9,3)= 3     B2   Block 7

16   (1,3)= 5     B2   Block 1

17   (6,9)= 6     B2   Block 6

18   (7,2)= 6     B2   Block 7

19   (9,6)= 9     B2   Block 8

20   (4,8)= 1     B3   Block 6

21   (8,4)= 1     B3   Block 8

22   (5,5)= 3     B3   Block 5

23   (8,8)= 3     B3   Block 9

24   (2,8)= 5     B3   Block 3

25   (4,1)= 6     B3   Block 4

26   (3,3)= 7     B3   Block 1

27   (4,4)= 9     B3   Block 5

28   (6,6)= 1     B4   Block 5

29   (9,9)= 1     B4   Block 9

30   (4,6)= 4     B4   Block 5

31   (5,7)= 4     B4   Block 6

32   (7,7)= 5     B4   Block 9

33   (1,7)= 7     B4   Block 3

34   (2,5)= 9     B4   Block 2

35   (6,2)= 9     B4   Block 4

36   (7,8)= 4     B5   Block 9

37   (2,4)= 7     B5   Block 2

38   (9,7)= 8     B5   Block 9

39   (1,1)= 9     B5   Block 1

40   (3,7)= 9     B5   Block 3

41   (1,4)= 4     B6   Block 2

42   (8,5)= 4     B6   Block 8

43   (2,2)= 8     B6   Block 1

44   (8,1)= 8     B6   Block 7

45   (3,2)= 4     B7   Block 1

46   (2,9)= 4     B7   Block 3

47   (9,1)= 4     B7   Block 7

48   (1,6)= 8     B7   Block 2

49   (7,5)= 8     B7   Block 8

50   (2,6)= 3     B8   Block 2

51   (1,9)= 3     B8   Block 3