現在.NETの勉強をしているものです。
Windows Forms アプリを Visual Studio 2019 でフレームワークを .NET Framework 4.7.2 で作っています。
テキストボックス6つを設置し各テキストボックスに500円、百円、五十円、十円、五円、一円の枚数を入力できるようにしました。
ここに各コインの枚数を入力してボタンを押すたびに自分で作ったCoinCaseクラスにそれぞれの種類のコインの枚数を記録して増やしていけるようにしたいと思っています。
そこで下記コードを作成したのですが、なぜかボタンを押すたびにクラス内のdataが初期化されています。
本当はボタンを押すたびに過去の枚数+入力した枚数としていきたいのですが、、、
どなたか解決方法教えてください。よろしくお願いします!
Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim t500 As Integer = TextBox1.Text Dim t100 As Integer = TextBox2.Text Dim t50 As Integer = TextBox3.Text Dim t10 As Integer = TextBox4.Text Dim t5 As Integer = TextBox5.Text Dim t1 As Integer = TextBox6.Text Dim tyokin10 As New CoinCase tyokin10.AddCoins(t500, t100, t50, t10, t5, t1) Label1.Text = tyokin10.count Label2.Text = tyokin10.data500 Label3.Text = tyokin10.data100 Label4.Text = tyokin10.data50 Label5.Text = tyokin10.data10 Label6.Text = tyokin10.data5 Label7.Text = tyokin10.data1 End Sub End Class Class CoinCase Public Property data500 As Integer Public Property data100 As Integer Public Property data50 As Integer Public Property data10 As Integer Public Property data5 As Integer Public Property data1 As Integer Public Property count As Integer Public Sub AddCoins( dt500count As Integer, dt100count As Integer, dt50count As Integer, dt10count As Integer, dt5count As Integer, dt1count As Integer ) count += 1 data500 += dt500count data100 += dt100count data50 += dt50count data10 += dt10count data5 += dt5count data1 += dt1count End Sub End Class
回答1件