dingwei.prg

来自「这是一款非常实用的福彩3D彩票统计分析软件,实现各种代码走势图的查看,以及按照相」· PRG 代码 · 共 35 行

set talk off

IF M=百位.or.M=十位.or.M=个位
   TXT=ALLTRIM(THISFORM.TEXT1.VALUE)
   N=LEN(TXT)
   
do case
   case n=1
   
   case n=2
   
   case n=3
   
   case n=4
   
   case n=5
   
   case n=6
   
   case n=7
   
   case n=8
   
   case n=9
   
   case n=10
   
   otherwise
   
   messagebox("你输入的条件错了，请重新输入！",0+48,"提示信息")
   
   endcase
 ENDIF