我要实现这种功能:屏幕上出现一Textbox框(或其它框),用扫描枪输入一串字符(长度是一致的,比如12位数),在判断是12位后,程序即自动去运行下面的程序,如果不是12位数,则继续出现这个Textbox框,等待输入正确长度的字符。上述功能该怎么实现,谢谢。

解决方案 »

  1.   

    private sub text1_change()
      if len(text1.text)=12 then
        '在此执行要执行的
      end if
    end sub
      

  2.   

    private sub text1_change()
      if len(text1.text)=12 then
        NextObject.setfocus
      end if
    end sub 
      

  3.   

    谢谢!
    另外,如果strcomp比较结果是一样的,那么输入框怎么叫它清空,并继续等待输入?
      

  4.   

    if strcomp(....) then
    text1=""
    end if
      

  5.   

    除了用if 语句判断,如果用do loop等循环语句的话,len这个函数不能用了,会陷入死循环。