如何让单行密码编辑框只能输入数字

(1)在窗口中建立实例变量

boolean ib_change = false

(2)建立一个事件:ue_changing() Event Id 为 pbm_enchange
代码如下

if not ib_change then
    ib_change = true
    int i
    int li_pos
    string lsdata
    li_pos = selectedstart( )
    for i=1 to len(text)
        if not Match( mid(text,i,1) , "[0-9]") then
            li_pos --
            continue
        end if
        lsdata+=mid(text,i,1)
    next

    text = lsdata
    this.selecttext(li_pos,0)
    ib_change = false

end if

(3)试试效果吧