📄 dingwei.prg
字号:
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
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -