主题：关于NumericComboBox

1、Validating事件

If val(e.Sender.Text) < 0 OrElse e.Sender.Text.indexof(".") > -1 Then
    msgbox("只能输入正整数")
    e.cancel = True
End If

2、不能控制输入的，只能在离开的时候判断输入是否正确。Validating事件

Dim idx As Integer = e.sender.text.indexof(".")
If idx > -1 AndAlso e.sender.Text.length - idx - 1 > 2 Then
    msgbox("只能输入两位小数")
    e.cancel = True
End If