Foxtable(狐表)用户栏目专家坐堂 → 关于NumericComboBox


  共有1911人关注过本帖树形打印复制链接

主题:关于NumericComboBox

帅哥哟,离线,有人找我吗?
zhsenchzhi
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:423 积分:3196 威望:0 精华:0 注册:2013/5/10 10:01:00
关于NumericComboBox  发帖心情 Post By:2016/2/20 19:47:00 [只看该作者]

关于NumericComboBox,有两个问题需要请教:

1  如何控制  一个NumericComboBox,只能输入正数,和整数

2  一个NumericComboBox,在属性设置了格式为 0.00, 也就是保留两位小数, 但是在输入时,仍然能输入多位小数,请问,怎样设置才能保证输入最多2位小数,不能多输入呢?

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/2/21 11:09:00 [只看该作者]

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


 回到顶部