第3講 for文の学習

第10話 10行10列の場合の行(列)合計・行(列)平均の計算

前話解答例
Form1
データグリッドビュー
列幅はすべて列幅70
#pragma endregion
   private: System::Void button1_Click(System::Object^ sender, System::EventArgs^ e) {
           int i,j;
           double w;

           //12行追加
           for(i=0;i<12;i++)dataGridView1->Rows->Add();

           //縦表題
           dataGridView1[11,0]->Value =L"合計 ";
           dataGridView1[12,0]->Value =L"平均 ";

           //横表題
           dataGridView1[0,11]->Value =L"合計 ";
           dataGridView1[0,12]->Value =L"平均 ";


           //2次元データ作成
           for(i=1;i<11;i++){
             for(j=1;j<11;j++){
               dataGridView1[j,i]->Value =10*(i-1)+j;
             }
           }

           //行合計・行平均の計算
           for(i=1;i<11;i++){
             w=0;
            for(j=1;j<11;j++){
              w=w+(int)(dataGridView1[j,i]->Value);
            }
            dataGridView1[11,i]->Value=w;
            dataGridView1[12,i]->Value=w/10;
          }

          //縦合計・縦平均の計算
          for(i=1;i<11;i++){
            w=0;
            for(j=1;j<11;j++){
              w=w+(int)(dataGridView1[i,j]->Value);
            }
            dataGridView1[i,11]->Value=w;
            dataGridView1[i,12]->Value=w/10;
          }

        }
};
}





第9話へ 第4講第1話へ

025


vc++講義第1部へ
vb講義へ
VB講義基礎へ
初心者のための世界で一番わかりやすいVisual Basic入門基礎講座へ

数学研究室に戻る