我有最小值和最大值文本框进行检查，最小值不能大于最大值.S

我有最小值的文本框和所有化学元素名称的最大值文本框我想检查最小值值不能大于最大值。所以，需要帮助。我有最小值和最大值文本框进行检查，最小值不能大于最大值.S

2015-12-21 PRITAM BERIHA

显示您的代码！要检查？，你的两个文本框只接受数字？ –

是的只有数字 –

还有一个检查，即最大值不能小于最小值，因为这两个值都由用户输入。一个是相对于其他的，所以我相信你必须验证它们作为用户的更详细的错误消息的值对。我会执行保存更新验证。 – shadow

处理这两个文本框只接受数字（可选）

Private Sub txtMIN_KeyPress(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) _ 
    Handles txtMIN.KeyPress, txtMAX.KeyPress 
     If Not Char.IsNumber(e.KeyChar) AndAlso Not Char.IsControl(e.KeyChar) Then 
      e.KeyChar = "" 
     End If 
    End Sub

对于检查：

可以使用val()功能： - 返回字符串中包含的数字值的数字适当的类型

Private Sub txtMIN_Leave(ByVal sender As System.Object, ByVal e As System.EventArgs) _ 
    Handles txtMIN.Leave, txtMAX.Leave 
      If Trim(txtMIN.Text) <> String.Empty AndAlso Trim(txtMAX.Text) <> String.Empty Then 
      If Val(txtMIN.Text) > Val(txtMAX.Text) Then 
       MsgBox("Min value cannot be greater than max value") 
       txtMIN.Focus() 
      End If 
     End If 
    End Sub

来源

2015-12-21 09:24:44

我有多个最小和最大文本框，如碳的最小文本框，最大文本框，然后是硫的最小文本框 - 最大文本框中，有24个化学元素的名称。我想要多种方式的答案。 –

@PRITAMBERIHA我不能在这里写盲代码，因为你没有提供代码。上述答案是执行此任务的基本方法 –

Private Function rangecheck（）尝试如果Val（txtCarbonMin.Text）> Val（txtCarbonMax.Text）然后 lblMessage.Text =“碳最小值不能大于最大值” 返回FALSE 结束如果如果val（txtAntimonyMin.Text）>缬氨酸（txtAntimonyMax.Text）然后 lblMessage.Text = “锑最小值不能超过最大值大” 返回FALSE 结束如果 ...... ..... 返回True 赶上ex例外返回假结束尝试 End Function –

我有最小值和最大值文本框进行检查，最小值不能大于最大值.S

回答

相关问题