VFP高手帮帮忙~

来源：百度知道 编辑：UC知道 时间：2024/06/04 04:27:27
1、某航空公司规定：在7~9月份，如果订票数超过20张，则优惠票价15%；如果超过10张，则票价优惠5%。在1~5月份、10月份和11月份，如果订票数超过20张，则票价优惠25%；如果超过10张，则票价优惠15%。现要求从表单中输入票价、月份以及订票数，并显示出所需金额。

2、使用for循环，计算以下算式的值。
S=1（一次方）+2（平方）+3（三次方）+4（四次方）+5（五次方）。。
要求：使用一个文本框输入需要计算的次数，使用另一个文本框显示计算的结果。

3、根据以下步骤求两个自然数的最大公约数。
（1）在两个文本框输入两个自然数M，N。
（2）计算M除与N的余数R。
（3）用N替换M，M=N；用R替换N，N=R。
（4）若R<>0，则重复步骤（2）和（3）。
（5）输出R。

你的问题有点多，分有点少（哈哈）．这样吧，我来回答，仅供参考．
1．设
票价文本框为Text1
月份文本框为Text2
订票数文本框为Text3
所需金额文本框为Text4
表单上”计算”或”确定”命令按钮为Command1，则其单击事件代码为：
Command1.click
if thisform.text2.value>=7 and thisform.text2.value<=9
if thisform.text3.value>20
thisform.text4.value=thisform.text1.value*(1-*0.15)
else
thisform.text4.value=thisform.text1.value*(1-*0.05)
endif
else
if thisform.text3.value>20
thisform.text4.value=thisform.text1.value*(1-*0.25)
else
thisform.text4.value=thisform.text1.value*(1-*0.15)
endif
endif
*********************************
2．设
次数---Text1
结果---Text2
开始---Command1，则其Click事件代码为：
for i=1 to thisform.Text1.value
s=s+i^i
next i
thisform.Text2.value=s
********************************
3．设
M---Text1
N---Text2
结果---Text3
计算---Command1，则其Click事件代码为：
m=thisform.Tex