谁能帮我写下 visual foxpro 里 这个命令语句
是一个排序。就是text.1 text2输入两个数 点下排序可以在text3 text4 按大到小的顺序出现这两数。 这个排序的命令语句怎么写
是一个排序。就是text.1 text2输入两个数 点下排序可以在text3 text4 按大到小的顺序出现这两数。 这个排序的命令语句怎么写
答案:在排序命令按钮里输入以下命令:
a=val(alltrim(thisform.text1.value))
b=val(alltrim(thisform.text2.value))
if a<b
c=a
a=b
b=c
endif
thisform.text3.value=str(a)
thisform.text4.value=str(b)
其他:**排序按钮 事件 click
text3.value = min(text1.value,text2.value)
text4.value= max(text1.value,text2.value)
**end click
上一个:visual foxpro编辑正方形的边长显示周长和面积的程序
下一个:visual foxpro 6.0官方下载安装不了