使用VB.NET中的条件来计算

Question

我在Windows窗体中运行一个程序visual basic，我试图制作多个计数器

这是我的代码：

If txtAnswer.Text = nMathSum Then
        nCount = nCount + 1
        lblCorrect.Text = nCount
    ElseIf txtAnswer.Text <> nMathSum Then
        nIount = nIount + 1
        lblIncorrect.Text = nIount
    End If

    If txtAnswer.Text = nMathDiff Then
        nCount = nCount + 1
        lblCorrect.Text = nCount
    ElseIf txtAnswer.Text <> nMathDiff Then
        nIcount = nIcount + 1
        lblIncorrect.Text = nIout
    End If

它假设计算我正确和错误地回答的次数

总和的计数器工作正常，但差异的计数器有问题。 当我输入正确的答案时，它会转到错误的标签。

Answer 1

txtAnswer不太可能匹配总和和差异。因此，在您的代码中，您将始终至少有一个不正确。

您是否有办法知道txtAnswer是否应该与总和或差异相匹配 - 如果是，请在检查答案之前检查。

编辑（解释我的意思）：像

这样的东西

If operation = "+" Then
    If txtAnswer.Text = nMathSum Then
        nCount = nCount + 1
        lblCorrect.Text = nCount
    ElseIf txtAnswer.Text <> nMathSum Then
        nIcount = nIcount + 1       ' corrected this line to use nIcount
        lblIncorrect.Text = nIcount ' corrected this line to use nIcount
    End If
Else
    If txtAnswer.Text = nMathDiff Then
        nCount = nCount + 1
        lblCorrect.Text = nCount
    ElseIf txtAnswer.Text <> nMathDiff Then
        nIcount = nIcount + 1
        lblIncorrect.Text = nIcount ' corrected this line too
    End If
End If

其中operation是一个设置为“+”或“ - ”的变量，具体取决于用户是否应该提供总和或差异。

Answer 2

seconf nIount中nIcount的拼写错误为Elseif 同样在最后一行中为nIout。把它纠正为：

ElseIf txtAnswer.Text <> nMathDiff Then 
    nIount = nIount + 1 
    lblIncorrect.Text = nIount 
End If 

这假设第一次出现（nIount）是正确的拼写。