计算赢/输百分比

时间:2009-02-19 23:41:33

标签: vb.net

我需要计算赢得的游戏和游戏丢失的百分比。我一直在犯错误,这让我陷入困境。我已经多次更改了我的代码,以至于当我开始时我并不记得它是什么样的。

Private Sub btnPercentage_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPercentage.Click
    Dim team As String
    Dim won, lost, percentage As Integer

    team = CStr(txtTeam.Text)
    won = CInt(txtGamesWon.Text)
    lost = CInt(txtGamesLost.Text)
    percentage = CInt(txtPercent.Text)

    percentage = (won + lost) / 2

    txtPercent.Text = team & " won" & percentage & " of its games."

6 个答案:

答案 0 :(得分:6)

在开始编写代码之前先考虑问题。现在,这是您的代码工作方式:

“A队赢了5场比赛,输了3场,所以赢得比赛的比例是(5 + 3)/ 2 = 4%”

作为程序员,最重要的技能可能是将问题分解为计算机执行步骤的能力,确保在开始编写之前已经找到了正确的步骤。

答案 1 :(得分:2)

获胜百分比=总赢额/(总赢额+总损失数)

出于显示目的,您可能需要将其乘以100。

答案 2 :(得分:2)

Dim team as String = txtTeam.Text  
Dim won as Integer = Cint(txtGamesWon.Text)  
Dim lost as Integer = CInt(txtGamesLost.Text)  
Dim percentage as Integer = Cint(won / (won + lost) * 100)  
txtPercent.Text = team & " won " & percentage & "% of its games."  

如果你想让它更能抵抗不良输入,你可以使用Integer.TryParse而不是Count。

答案 3 :(得分:1)

percentage = (won + lost) / 2不可能是正确的。

赢得的百分比不是percentage_won = won / (won + lost)

百分比丢失percentage_lost = lost / (won + lost)

答案 4 :(得分:0)

percentage = won / (won + lost)

顺便说一句,如果Visual Studio没有关闭:

Dim won, lost, percentage As Integer

它会变暗并失去作为物体,而不是整数。

答案 5 :(得分:0)

这里的大部分问题都与编程无关。

首先要知道计算百分比背后的简单数学会有所帮助。这个应该是相对简单的,首先在纸上解决。

当我读到时,我的眼睛开始出血:

percentage = (won + lost) / 2.

百分比不应该等于比赛次数的一半(尽管很多美国职业棒球大联盟球队会挖掘这个记录)。