vb.net - 値を 1 つインクリメントする Visual Basic が動かなくなった

Question

Visual Basic でボタンをクリックした後に値を 1 ずつ増やすコードを作成しようとしています。これらはこれまでに試したコードですが、目的を達成できていません。

コード 1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
   Dim votecount As Integer = Integer.Parse(showcountwinnie.Text)
   votecount += 1
   showcountwinnie.Text = votecount.ToString()
End Sub

コード2

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  Dim votes As Integer
  votes = 0
  votes += 1
  votes = showcountwinnie.Text
End Sub

コード 3

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
   Dim votewinnie As Integer
   votewinnie = showcountwinnie.value
   votewinnie = votewinnie + 1
   showcountwinnie.value = votewinnie
End Sub

Answer 1

手っ取り早い方法:

        Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
            showcountwinnie.Text = (Val(showcountwinnie.Text) + 1).ToString()
        End Sub

よりエレガントな方法:

        Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
            Dim votecount As Integer
            If Integer.TryParse(txt_UTC.Text, votecount) Then
                votecount += 1
            Else
                ' whatever you want to do with votecount
                votecount = 0
            End If
            txt_UTC.Text = votecount.ToString()
        End Sub

Answer 2

これを試して

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Static votecount As Integer = 0
    votecount += 1
    showcountwinnie.Text = votecount.ToString()
End Sub

Answer 3

コード 1 は正しいようです。1行目にブレークポイントを置いて、ボタンをクリックしている間にコード行が実行されているかどうかを確認してください

Answer 4

ちょっと遅いですが、あなたのコード 1 は動作しません Parse メソッドには 2 つの引数が必要です。 コード 2 では、 showcountwinnie.Text = votes
のようなものとは逆の方法で物事を割り当てることを意図しています。とにかく、この showcountwinnie は何ですか? テキストボックス？ラベル？