0

CInt、TryParse、Convert.Int32 などを使用して変換を試みましたが、何も機能しませんでした。ボタン btnVote がクリックされたときに候補者の総投票数を表示し、btnResult をクリックすると結果を表示するだけです。私もネットで検索してみましたが、まだ運がなかったので、このウェブサイトにたどり着きました.VB.netのプログラムで問題を解決できることを願っています.

以下は私のコードです：

Public Class Presidential_Election

    Private Sub btnVote_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnVote.Click
        If cboCandidates.Text = "NOLI" Then
            lblNoli.Text = Integer.Parse(lblNoli.Text) + 1
        ElseIf cboCandidates.Text = "VAL" Then
            lblVal.Text = (CInt(lblVal.Text) + 1).ToString
        ElseIf cboCandidates.Text = "LESTER" Then
            lblLester.Text = CInt(lblLester.Text) + 1
        ElseIf cboCandidates.Text = "GWAPO" Then
            lblGwapo.Text = CInt(lblGwapo.Text) + 1
        End If
    End Sub

    Private Sub btnResult_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnResult.Click
        lblNoli.Visible = True
        lblVal.Visible = True
        lblLester.Visible = True
        lblGwapo.Visible = True
    End Sub
End Class
4

2 に答える 2

1

I would set an integer counter for each candidate. Set these to 0 and then increment them as they receive a vote. When you display the results just bind the text of the label to its respective counter and make it visible. This way, you don't have to keep referencing label.text.

于 2013-02-22T21:39:03.130 に答える
0

0ラベルテキストを最初に設定していない場合、を使用CIntすると間違いなくエラーがスローされます。2つのオプションがあります：

  • CIntすべてのラベルテキストを0に設定し、、またはを使い続けます
  • Val（）を使用する

例 ：

lblGwapo.Text = Val(lblGwapo.Text) + 1
于 2013-02-22T21:32:15.037 に答える