配列変数

・簡単な配列の使い方
・メッセージをランダムに表示してみよう
・For文と組み合わせた配列

○配列変数

• 通常の変数と配列変数との違い

従来扱ってきた普通の変数は、一つの箱。よって一つの数値などを代入して保存しておくことができるものであった。

これに対して配列変数は、従来の変数が横に並んでいるものである。
そして、０番目、１番目などのようにそれら複数の箱をインデックス値と呼ばれる番号で指すことができる。

例えば、配列変数aがあった時、この０番目の箱をa(0)と表し、８番目の箱をa(8)と表す。
更に、n=3 のとき、a(n)は、３番目の箱を表す。

あるクラスXのテストの結果をプログラムで扱うとき、Aさん、Bさん、Cさん、、、の点数を、a, b, c,... などの変数に入れて計算することもできる。
が、非常に効率が悪い。この場合配列変数を用いると非常に便利である。
x(0), x(1), x(2),... という配列にそれぞれの点数を入れておけば、For文などのループを利用して全体の合計などを簡単に求めることができる。
このようにインデックス値を、出席番号・背番号のように扱うことができるのが配列変数である。

なお、変数名には数字を使ってもよい。よってx0, x1, x2,... に、Aさん、Bさん、Cさん、、、の点数を入れておくこともできるが、数字の部分は明示しなければならないので、上記のa,b,c,...という変数を使った場合と何ら変わることはない。

• インデックス値と変数の宣言
  • 今まで変数は、単に使いたい時に勝手に使ってきたが、実は多くのプログラミング言語では「変数の宣言」というもので、どのような変数を利用するのかを明確に記述しなければいけない。VBでも実際には変数の宣言ができる。なお、変数の宣言はプログラムのミス（例えば変数名のタイプミスなど）を無くすためなどにおいては非常に有効である。
  • VBにおいて、配列変数を用いる場合は、必ず宣言をしておかなければいけない。
  • 配列変数の宣言の場合、重要なのはインデックス値との関係である。
  • 配列変数を宣言する際には、単に配列変数であることだけではなく、
    いくつの要素（箱）の配列なのかを宣言しなければならない。
  • よって、インデックス値として利用する最大の数を想定しておかなければならない。
  • 配列変数の宣言は、次のようにする。
    Dim 配列変数名( 要素数 )
  • ここで配列変数名は通常の変数名の規則と全く同じである。
  • 要素数は、必ず定数でなければいけなく、つまり直接数字を書かなければいけない。
    変数などで指定することはできない。
  • 例えば、最大１０人のデータを扱う配列変数xとする場合、
    Dim x( 9 )
    とプログラム内で宣言しなければならない。
    なお、この場合、x(0), x(1), ..., x(9) までが利用でき、x(10)は利用できないことに注意する必要がある。
  • ちなみに、配列の要素数は若干余裕をもって宣言しておいても構わない。
    ここでは説明しないが、余分な変数はメモリを消費するのであまり大きく取り過ぎない方がよい。が、現時点ではそれほどシビアなプログラムではないので、例えば１０個程度のデータを扱うのであれば、１５個程度宣言しておいても、全く問題ない。

○例；メッセージをランダムに表示してみよう

• 「未成年／成人」「勝ち／負け」などのメッセージの多様化を考えよう。
  • 例えば年齢を計算し、「未成年」か「成人」かを判断させることはもう既にプログラムできる。
  • 更に同じ「未成年」と判断されたとしても、「未成年ですよ」「まだまだ子供」「大人じゃないよね」「がんばれ青年」などなど、同じ内容でも違ったメッセージを出すことも今までの知識で十分に可能。
  • 基本的には、さいころを転がして、さいころの目によって、メッセージを変えるようにすればよい。
  • 丁半ゲームにおける「勝ち」「負け」の表示も同じ。
• まずはIf文、もしくはSelect文によるメッセージ表示の多様化
  • ランダムにどれかを実行させるには、Rnd()関数とIf文を利用すれば可能。
    もちろん、If文ではなくSelect文でも全く問題なし。
  • Select文による例（復習）；

  Randomize
  d = Int( Rnd(1) * 4 )
  Select d
    Case 0
      Label1.Text = "未成年ですよ"
    Case 1
      Label1.Text = "まだまだ子供"
    Case 2
      Label1.Text = "大人じゃないよね"
    Case 3
      Label1.Text = "がんばれ青年"
  End Select
  

• 配列変数を使ったメッセージ表示の多様化
  • 上記SelectやIfではなく、配列変数を用いてもっとスマートに書けないか考えてみよう。
  • なお、変数（配列に限らない）には、数字以外に「文字列」を代入することができる。
  • 例えば、「a = "あいうえお"」とすると、変数aに文字列「あいうえお」が代入される。
  • 更に、「Label1.Text = a」とすると、Label1に文字列「あいうえお」が表示される。
  • 配列変数に、違う文字列を入れておき、さいころを振ってインデックス値をランダムにすればよいはず！
  • 具体的には、次のように考える
    • 文字列をしまっておく配列変数を用意する
    • 配列の各々の要素に、適当な文字列を代入しておく
    • サイコロを振って、もし１がでたら配列の１の要素に代入されている文字列を表示
    • もし２だったら配列の２、３なら３...とする

      Dim d, m(10)
      Randomize()
      m(1) = "あああ"
      m(2) = "いいい"
      m(3) = "ううう"
      m(4) = "えええ"
      m(5) = "おおお"
      d = Int(Rnd(1) * 5) + 1
      Label1.Text = m(d)
      

○For文と配列を組み合わせて利用した例

• 配列は、For文と組み合わせてよく利用される。
• これは、For文のカウンタ変数を配列のインデックス値として利用すると便利だからである。
• 例えば、1+2+3+,,,+10 という計算を、無理矢理配列を使って計算させてみよう。
  • Dim a(10)
    For i = 1 To 10
    a(i) = i
    Next i
    s = 0
    For i = 1 To 10
    s = s + a( i )
    Next i
  • 前半のFor文では配列にデータを代入させている。つまりa(1)=1, a(2)=2などのように。
  • 後半のFor文ではデータが蓄えられている配列変数aを利用して次々と変数sに足し合わせて合計を求めている。
• 例題；テストの採点
  • １０人のテスト結果の統計を取ってみよう。
    • データの入力はInputBox()関数を利用してその都度入力してもらうものとしよう。
  • まずは、平均点。
    • 平均点ってどう計算すればよいかをまず考えよう。
    • 入力時に計算させることも可能だが、別のFor文を作ってみよう。
  • 次に８０点以上の人数。
    • 更に別のFor文を作り、次々と点数を調べていく。
    • つまり、For文の中にIf文を利用して、８０点以上の人をカウントさせていく。
    • カウントの方法は、例えば、c = c + 1 などとすれば、一つづつ数字を増やしていくことができる。

教科書；
15.4 配列の宣言

[「Ｃ班」プログラミング基礎のTopに戻る]