展开全部
表单:
&& Command1 的 Click() 代码:
LOCAL i, n, cChr, c1, c2, c3, c4, c5, n大写, n小写, n数字
c1 = ALLTRIM(thisform.text1.Value)
STORE "" TO c2, c3, c4, c5
STORE 0 TO n大写, n小写, n数字, q其他
n = LEN(c1)
FOR i = 1 TO n
&& Command1 的 Click() 代码:
LOCAL i, n, cChr, c1, c2, c3, c4, c5, n大写, n小写, n数字
c1 = ALLTRIM(thisform.text1.Value)
STORE "" TO c2, c3, c4, c5
STORE 0 TO n大写, n小写, n数字, q其他
n = LEN(c1)
FOR i = 1 TO n
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询