我有三个标签(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永远不会增加;但当我尝试:'If 100 > Label2.Text‘或'If Label1.Text > 15’时,Label3会增加。我是不是遗漏了什么?
谢谢
发布于 2015-03-17 22:05:06
尝试将字符串值转换为整数。
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 https://stackoverflow.com/questions/29100801
复制相似问题