求高手帮忙VF作业! 10
图(b)设计下图(a)所示表单,表单标题栏必须有自己的姓名和学号,文件名:F3301.SCX(F3+学号后三位),在text1中输入一串字符串,单击按钮组中的“数字字符”...
图(b)
设计下图(a)所示表单,表单标题栏必须有自己的姓名和学号,文件名:F3301.SCX(F3+学号后三位),在text1中输入一串字符串,单击按钮组中的“数字字符”按钮,在标签Label2中逆序显示数字串;单命令按组组中的“非数字字符”按钮后,在标签Label2中显示逆序非数字串(如图(b)所示后。在命令按钮的Click事件中输入如下代码并完美程序。
x=alltrim(thisform.text1.value)
y=""
if (1)
for i=len(x) to 1 step -1
x1=substr(x,i,1)
if (2)
y=y+x1
endif
endfor
else
_ (3)
x1=substr(x,i,1)
if not(asc(x1)>asc("0") and asc(x1)<=asc("9"))
y=y+x1
endif
endfor
endif
thisform.label2.caption=y 展开
设计下图(a)所示表单,表单标题栏必须有自己的姓名和学号,文件名:F3301.SCX(F3+学号后三位),在text1中输入一串字符串,单击按钮组中的“数字字符”按钮,在标签Label2中逆序显示数字串;单命令按组组中的“非数字字符”按钮后,在标签Label2中显示逆序非数字串(如图(b)所示后。在命令按钮的Click事件中输入如下代码并完美程序。
x=alltrim(thisform.text1.value)
y=""
if (1)
for i=len(x) to 1 step -1
x1=substr(x,i,1)
if (2)
y=y+x1
endif
endfor
else
_ (3)
x1=substr(x,i,1)
if not(asc(x1)>asc("0") and asc(x1)<=asc("9"))
y=y+x1
endif
endfor
endif
thisform.label2.caption=y 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询