我无法让我的程序获取文本框中的数据并告诉它是否为空,包含整数或十进制数。如果它是空白的,我希望它将变量PropAmt
分配给0.00。如果它有一个整数,我希望它将PropAmt
分配给一个小数。如果是小数,请单独留下PropAmt
。
这是我到目前为止所做的:
Dim PropAMT = cdec(txtPropAMT.Text)
If txtPropAMT.Text = "" Then
txtPropAMT.Text = 0.0
Else txtPropAMT.Text = CInt(txtPropAMT.Text) Then
PropAMT = PropAMT & ".00"
ElseIf txtPropAMT.Text = CDec(txtPropAMT.Text) Then
PropAMT = PropAMT
End If
答案 0 :(得分:0)
约翰,
这是你一直在寻找的 如果txtBox.Text = String.Empty那么
ElseIf (txtBox.Text Is GetType(Integer)) Then
ElseIf (txtBox.Text Is GetType(Decimal)) Then
End If