第2講 変数を理解しよう
第5話 TextBoxから値を取得

実行結果
簡易計算
解答例
Public Class Form1

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
     Dim a As Integer, b As Integer, c As Integer 'まとめて整数型変数を宣言

     '変数に整数を代入
     a = 6
     b = 5
     'aとbを表示
     Label1.Text = a
     Label3.Text = b

     '和を計算
     c = a + b
     '和を表示
     Label9.Text = c

     '差を計算
     c = a - b
     '差を表示
     Label10.Text = c

     '積を計算
     c = a * b
     '積を表示
     Label11.Text = c

     '商を計算
     c = a / b
     '商を表示
     Label12.Text = c

   End Sub
End Class

実行結果を見るとかなり見やすくなりました。
しかし、このソフトには根本的な欠陥があります。
世界最初のコンピュータENIACは、
幅24m、高さ2.5m、奥行き0.9m、総重量30トンと大掛かりな装置で、設置には倉庫1個分のスペースを要して、消費電力は150kWにもなり、開発費の総額は49万ドルもかかったそうですが、
別の計算を行わせるときは、いちいち配線をし直したといいます。
今のコンピュータならキーボードから別のデータを入力すれば簡単に別のデータについて計算できましたが、
ENIACはいちいちハードを作り直さなければいけなかったわけです。
今回のソフトは、いちいちハードはいじりませんが、別のデータで計算し直させるときに、
プログラムそのものをいじらなければなりません。
ですので、起動したソフト上から別のデータも取得して計算できるように変更しましょう。
TextBox
上のようにして値を取得できれば、キーボードから何回でも値を入れ直すことができます。
(割り算の計算が正確にできない問題は、第8話の浮動点小数点型変数で改善します。)
ソフト上からデータを取得するには、ツールボックスのTextBoxを使用する方法があります。
ツールボックス
TextBoxを使い、Form1.vb[デザイン]を次のように変更してみましょう。
Form1の説明

TextBox1から値を取得するには、
a=TextBox1
とします。
それでは皆さん、コーティングを考えてみてください。

第4話へ 第6話へ

006

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


数学研究室に戻る