Label.Text> Label.Text Visual Basic

时间:2015-03-17 13:49:44

标签: visual-studio-2010

我有三个标签(Label1,Label2和Label3)都有数字文本值。当单击一个按钮时,我想要一个If语句来检查Label1是否大于Label2,如果是,那么我希望Label3上升一个。这是我的代码:

If Label1.Text > Label2.Text Then Label3.Text = Label3.Text + 1 End If

我测试了上面的代码,Label1.Text为100,Label2.text为15,但Label3永远不会增加;但是当我尝试:'如果100> Label2.Text'或'If Label1.Text> 15'Label3会增加。我错过了什么吗?

由于

1 个答案:

答案 0 :(得分:0)

尝试将字符串值转换为整数。

        Dim label1text As String
             label1text = Label1.Text
        Dim label1asNumber As Integer

        Dim label2text As String
             label2text = Label2.Text
        Dim label2asNumber As Integer

        Dim label3text As String
             label3text = Label3.Text
        Dim label3asNumber As Integer


        If IsNumeric(label1text) Then
        label1asNumber = CInt(label1text)
        Else
        label1asNumber = 0 'raise an error
        End If
        If IsNumeric(label2text) Then
        label2asNumber = CInt(label2text)
        Else
        label2asNumber = 0 'raise an error
        End If

然后你比较那些:

        if label1asNumber > label2asNumber
            If IsNumeric(label3text) Then
            label3asNumber = CInt(label3text) +1

         Label3.Text = label3asNumber.ToString
            else 
          ..... 'your code