我有三个标签(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会增加。我错过了什么吗?
由于
答案 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