求关于“提前还款“的计算

wh1234567

已知条件：
贷款总额：25000元
原来贷款期限：15年
首次还款日期：2010年5月
提前还款日期：2019年11月
贷款年利率：4.8%
还款方式：1.一次性提前还清、2.部分提前还款
提前还款额：4000元【如果还款方式为1时则本数值自动为0元，如果还款方式为1时则本数值4000元是有效数据】
处理方式：1.期限缩短，月还款不变、2.期限不变，月还款减少
需计算如下：
原来月还款额：？元
已还款总额：？元
已还利息额：？元
该月一次还款额：？元
下月起月还款额：？元
节省利息支出：？元
新的最后还款日期：？年？月

希望老师帮忙能不能实现用易语言源码实现计算？


补充内容 (2025-11-23 00:58):
”还款方式“有2种计算方式选项，”处理方式“也有2种计算方式选项

waweiggfnh

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
贷款总额	双精度小数型
原期限	整数型
首次还款日期	日期时间型
提前还款日期	日期时间型
年利率	双精度小数型
月利率	双精度小数型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

' 初始化数据
贷款总额 ＝ 25000
原期限 ＝ 15 × 12  ' 转换为月数
首次还款日期 ＝ 到时间 ("2010-05-01")
提前还款日期 ＝ 到时间 ("2019-11-01")
年利率 ＝ 0.048
月利率 ＝ 年利率 ÷ 12
' 初始化显示
计算原来月还款额 ()
计算已还款信息 ()

子程序名	返回值类型	公开	备 注
计算原来月还款额

变量名	类 型	静态	数组	备 注
月还款额	双精度小数型

月还款额 ＝ 贷款总额 × 月利率 × 求幂 (1 ＋ 月利率, 原期限) ÷ (求幂 (1 ＋ 月利率, 原期限) － 1)
编辑框_原来月还款额.内容 ＝ 数值到格式文本 (月还款额, 2, 假)

子程序名	返回值类型	公开	备 注
计算已还款信息

变量名	类 型	静态	数组	备 注
已还期数	整数型
已还总额	双精度小数型
已还利息	双精度小数型
剩余本金	双精度小数型
月还款额	双精度小数型
i	整数型
当月利息	双精度小数型
当月本金	双精度小数型

月还款额 ＝ 到数值 (编辑框_原来月还款额.内容)
' 计算已还款期数（从2010年5月到2019年11月）
已还期数 ＝ (取年份 (提前还款日期) － 取年份 (首次还款日期)) × 12 ��� (取月份 (提前还款日期) － 取月份 (首次还款日期))
剩余本金 ＝ 贷款总额
已还利息 ＝ 0
已还总额 ＝ 0
' 模拟已还款过程
计次循环首 (已还期数, i)
当月利息 ＝ 剩余本金 × 月利率
当月本金 ＝ 月还款额 － 当月利息
剩余本金 ＝ 剩余本金 － 当月本金
已还利息 ＝ 已还利息 ＋ 当月利息
已还总额 ＝ 已还总额 ＋ 月还款额
计次循环尾 ()
编辑框_已还款总额.内容 ＝ 数值到格式文本 (已还总额, 2, 假)
编辑框_已还利息.内容 ＝ 数值到格式文本 (已还利息, 2, 假)
' 保存剩余本金用于后续计算
标签_剩余本金.标题 ＝ 数值到格式文本 (剩余本金, 2, 假)

子程序名	返回值类型	公开	备 注
_按钮_计算_被单击

变量名	类 型	静态	数组	备 注
还款方式	整数型
处理方式	整数型
提前还款额	双精度小数型
剩余本金	双精度小数型
该月一次还款额	双精度小数型
下月起月还款额	双精度小数型
节省利息	双精度小数型
新的最后日期	日期时间型

还款方式 ＝ 选择框_一次性还清.选中 ? 1 : 2
处理方式 ＝ 选择框_期限缩短.选中 ? 1 : 2
提前还款额 ＝ 到数值 (编辑框_提前还款额.内容)
剩余本金 ＝ 到数值 (标签_剩余本金.标题)
如果 (还款方式 ＝ 1)  ' 一次性提前还清
该月一次还款额 ＝ 剩余本金
下月起月还款额 ＝ 0
节省利息 ＝ 计算剩余期限总利息 (剩余本金, 到数值 (编辑框_原来月还款额.内容))
新的最后日期 ＝ 提前还款日期

.否则  ' 部分提前还款
该月一次还款额 ＝ 提前还款额
剩余本金 ＝ 剩余本金 － 提前还款额

如果 (处理方式 ＝ 1)  ' 期限缩短，月还款不变
下月起月还款额 ＝ 到数值 (编辑框_原来月还款额.内容)
新的最后日期 ＝ 计算新的还款期限 (剩余本金, 下月起月还款额)
节省利息 ＝ 计算节省利息_期限缩短 (剩余本金, 下月起月还款额)

.否则  ' 期限不变，月还款减少
下月起月还款额 ＝ 计算新的月还款额 (剩余本金, 原期限 － 取还款期数 ())
新的最后日期 ＝ 取原计划最后日期 ()
节省利息 ＝ 计算节省利息_月供减少 (剩余本金, 下月起月还款额)



' 更新显示结果
编辑框_该月一次还款额.内容 ＝ 数值到格式文本 (该月一次还款额, 2, 假)
编辑框_下月起月还款额.内容 ＝ 数值到格式文本 (下月起月还款额, 2, 假)
编辑框_节省利息.内容 ＝ 数值到格式文本 (节省利息, 2, 假)
编辑框_新的最后日期.内容 ＝ 到文本 (取年份 (新的最后日期)) ＋ "年" ＋ 到文本 (取月份 (新的最后日期)) ＋ "月"

子程序名	返回值类型	公开	备 注
取还款期数	整数型

变量名	类 型	静态	数组	备 注
已还期数	整数型

已还期数 ＝ (取年份 (提前还款日期) － 取年份 (首次还款日期)) × 12 ��� (取月份 (提前还款日期) － 取月份 (首次还款日期))
返回 (已还期数)

子程序名	返回值类型	公开	备 注
计算新的月还款额	双精度小数型
参数名	类 型	参考	可空	数组	备 注
剩余本金	双精度小数型
剩余期数	整数型

变量名	类 型	静态	数组	备 注
新月供	双精度小数型

新月供 ＝ 剩余本金 × 月利率 × 求幂 (1 ＋ 月利率, 剩余期数) ÷ (求幂 (1 ＋ 月利率, 剩余期数) － 1)
返回 (新月供)

子程序名	返回值类型	公开	备 注
计算新的还款期限	日期时间型
参数名	类 型	参考	可空	数组	备 注
剩余本金	双精度小数型
月还款额	双精度小数型

变量名	类 型	静态	数组	备 注
剩余期数	整数型
新月数	整数型
新日期	日期时间型

' 通过迭代计算剩余期数
剩余期数 ＝ 0
循环判断首 ()
剩余期数 ＝ 剩余期数 ＋ 1
新月数 ＝ 计算月供所需期数 (剩余本金, 月还款额, 剩余期数)
循环判断尾 (新月数 ＞ 剩余期数 且 剩余期数 ＜ 500)  ' 设置最大迭代次数
新日期 ＝ 增减时间 (提前还款日期, 6, 剩余期数)  ' 6表示月份
返回 (新日期)

子程序名	返回值类型	公开	备 注
计算月供所需期数	整数型
参数名	类 型	参考	可空	数组	备 注
本金	双精度小数型
月供	双精度小数型
最大期数	整数型

变量名	类 型	静态	数组	备 注
测试本金	双精度小数型
i	整数型

测试本金 ＝ 本金
计次循环首 (最大期数, i)
测试本金 ＝ 测试本金 �� (1 ＋ 月利率) － 月供
如果 (测试本金 ≤ 0)
返回 (i)

计次循环尾
返回 (最大期数)

子程序名	返回值类型	公开	备 注
计算剩余期限总利息	双精度小数型
参数名	类 型	参考	可空	数组	备 注
剩余本金	双精度小数型
月还款额	双精度小数型

变量名	类 型	静态	数组	备 注
总还款	双精度小数型
剩余期数	整数型

剩余期数 ＝ 计算月供所需期数 (剩余本金, 月还款额, 500)
总还款 ＝ 月还款额 × 剩余期数
返回 (总还款 － 剩余本金)

子程序名	返回值类型	公开	备 注
计算节省利息_期限缩短	双精度小数型
参数名	类 型	参考	可空	数组	备 注
剩余本金	双精度小数型
月还款额	双精度小数型

变量名	类 型	静态	数组	备 注
原计划利息	双精度小数型
新计划利息	双精度小数型

原计划利息 ＝ 计算剩余期限总利息 (剩余本金, 月还款额)
新计划利息 ＝ 计算剩余期限总利息 (剩余本金, 月还款额)  ' 这里需要根据实际新期限计算
返回 (原计划利息 － 新计划利息)

子程序名	返回值类型	公开	备 注
计算节省利息_月供减少	双精度小数型
参数名	类 型	参考	可空	数组	备 注
剩余本金	双精度小数型
新月供	双精度小数型

变量名	类 型	静态	数组	备 注
原计划利息	双精度小数型
新计划利息	双精度小数型
剩余期数	整数型

剩余期数 ＝ 原期限 － 取还款期数 ()
原计划利息 ＝ 计算剩余期限总利息 (剩余本金, 到数值 (编辑框_原来月还款额.内容))
新计划利息 ＝ 新月供 × 剩余期数 － 剩余本金
返回 (原计划利息 － 新计划利息)

子程序名	返回值类型	公开	备 注
取原计划最后日期	日期时间型

变量名	类 型	静态	数组	备 注
最后日期	日期时间型

最后日期 ＝ 增减时间 (首次还款日期, 6, 原期限)  ' 6表示月份
返回 (最后日期)

子程序名	返回值类型	公开	备 注
_选择框_一次性还清_被单击

如果 (选择框_一次性还清.选中)
编辑框_提前还款额.内容 ＝ "0"
编辑框_提前还款额.禁止 ＝ 真
编辑框_提前还款额.内容 ＝ "4000"
编辑框_提前还款额.禁止 ＝ 假

.版本 2<br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 贷款总额, 双精度小数型<br /> .程序集变量 原期限, 整数型<br /> .程序集变量 首次还款日期, 日期时间型<br /> .程序集变量 提前还款日期, 日期时间型<br /> .程序集变量 年利率, 双精度小数型<br /> .程序集变量 月利率, 双精度小数型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> ' 初始化数据<br /> 贷款总额 ＝ 25000<br /> 原期限 ＝ 15 × 12  ' 转换为月数<br /> 首次还款日期 ＝ 到时间 ("2010-05-01")<br /> 提前还款日期 ＝ 到时间 ("2019-11-01")<br /> 年利率 ＝ 0.048<br /> 月利率 ＝ 年利率 ÷ 12<br /> <br /> ' 初始化显示<br /> 计算原来月还款额 ()<br /> 计算已还款信息 ()<br /> <br /> .子程序 计算原来月还款额<br /> .局部变量 月还款额, 双精度小数型<br /> <br /> 月还款额 ＝ 贷款总额 × 月利率 × 求幂 (1 ＋ 月利率, 原期限) ÷ (求幂 (1 ＋ 月利率, 原期限) － 1)<br /> 编辑框_原来月还款额.内容 ＝ 数值到格式文本 (月还款额, 2, 假)<br /> <br /> .子程序 计算已还款信息<br /> .局部变量 已还期数, 整数型<br /> .局部变量 已还总额, 双精度小数型<br /> .局部变量 已还利息, 双精度小数型<br /> .局部变量 剩余本金, 双精度小数型<br /> .局部变量 月还款额, 双精度小数型<br /> .局部变量 i, 整数型<br /> .局部变量 当月利息, 双精度小数型<br /> .局部变量 当月本金, 双精度小数型<br /> <br /> 月还款额 ＝ 到数值 (编辑框_原来月还款额.内容)<br /> ' 计算已还款期数（从2010年5月到2019年11月）<br /> 已还期数 ＝ (取年份 (提前还款日期) － 取年份 (首次还款日期)) × 12 ＋ (取月份 (提前还款日期) － 取月份 (首次还款日期))<br /> <br /> 剩余本金 ＝ 贷款总额<br /> 已还利息 ＝ 0<br /> 已还总额 ＝ 0<br /> <br /> ' 模拟已还款过程<br /> .计次循环首 (已还期数, i)<br />     当月利息 ＝ 剩余本金 × 月利率<br />     当月本金 ＝ 月还款额 － 当月利息<br />     剩余本金 ＝ 剩余本金 － 当月本金<br />     已还利息 ＝ 已还利息 ＋ 当月利息<br />     已还总额 ＝ 已还总额 ＋ 月还款额<br /> .计次循环尾 ()<br /> <br /> 编辑框_已还款总额.内容 ＝ 数值到格式文本 (已还总额, 2, 假)<br /> 编辑框_已还利息.内容 ＝ 数值到格式文本 (已还利息, 2, 假)<br /> <br /> ' 保存剩余本金用于后续计算<br /> 标签_剩余本金.标题 ＝ 数值到格式文本 (剩余本金, 2, 假)<br /> <br /> .子程序 _按钮_计算_被单击<br /> .局部变量 还款方式, 整数型<br /> .局部变量 处理方式, 整数型<br /> .局部变量 提前还款额, 双精度小数型<br /> .局部变量 剩余本金, 双精度小数型<br /> .局部变量 该月一次还款额, 双精度小数型<br /> .局部变量 下月起月还款额, 双精度小数型<br /> .局部变量 节省利息, 双精度小数型<br /> .局部变量 新的最后日期, 日期时间型<br /> <br /> 还款方式 ＝ 选择框_一次性还清.选中 ? 1 : 2<br /> 处理方式 ＝ 选择框_期限缩短.选中 ? 1 : 2<br /> 提前还款额 ＝ 到数值 (编辑框_提前还款额.内容)<br /> 剩余本金 ＝ 到数值 (标签_剩余本金.标题)<br /> <br /> .如果 (还款方式 ＝ 1)  ' 一次性提前还清<br />     该月一次还款额 ＝ 剩余本金<br />     下月起月还款额 ＝ 0<br />     节省利息 ＝ 计算剩余期限总利息 (剩余本金, 到数值 (编辑框_原来月还款额.内容))<br />     新的最后日期 ＝ 提前还款日期<br />     <br /> .否则  ' 部分提前还款<br />     该月一次还款额 ＝ 提前还款额<br />     剩余本金 ＝ 剩余本金 － 提前还款额<br />     <br />     .如果 (处理方式 ＝ 1)  ' 期限缩短，月还款不变<br />         下月起月还款额 ＝ 到数值 (编辑框_原来月还款额.内容)<br />         新的最后日期 ＝ 计算新的还款期限 (剩余本金, 下月起月还款额)<br />         节省利息 ＝ 计算节省利息_期限缩短 (剩余本金, 下月起月还款额)<br />         <br />     .否则  ' 期限不变，月还款减少<br />         下月起月还款额 ＝ 计算新的月还款额 (剩余本金, 原期限 － 取还款期数 ())<br />         新的最后日期 ＝ 取原计划最后日期 ()<br />         节省利息 ＝ 计算节省利息_月供减少 (剩余本金, 下月起月还款额)<br />         <br />     .如果结束<br />     <br /> .如果结束<br /> <br /> ' 更新显示结果<br /> 编辑框_该月一次还款额.内容 ＝ 数值到格式文本 (该月一次还款额, 2, 假)<br /> 编辑框_下月起月还款额.内容 ＝ 数值到格式文本 (下月起月还款额, 2, 假)<br /> 编辑框_节省利息.内容 ＝ 数值到格式文本 (节省利息, 2, 假)<br /> 编辑框_新的最后日期.内容 ＝ 到文本 (取年份 (新的最后日期)) ＋ "年" ＋ 到文本 (取月份 (新的最后日期)) ＋ "月"<br /> <br /> .子程序 取还款期数, 整数型<br /> .局部变量 已还期数, 整数型<br /> <br /> 已还期数 ＝ (取年份 (提前还款日期) － 取年份 (首次还款日期)) × 12 ＋ (取月份 (提前还款日期) － 取月份 (首次还款日期))<br /> 返回 (已还期数)<br /> <br /> .子程序 计算新的月还款额, 双精度小数型<br /> .参数 剩余本金, 双精度小数型<br /> .参数 剩余期数, 整数型<br /> .局部变量 新月供, 双精度小数型<br /> <br /> 新月供 ＝ 剩余本金 × 月利率 × 求幂 (1 ＋ 月利率, 剩余期数) ÷ (求幂 (1 ＋ 月利率, 剩余期数) － 1)<br /> 返回 (新月供)<br /> <br /> .子程序 计算新的还款期限, 日期时间型<br /> .参数 剩余本金, 双精度小数型<br /> .参数 月还款额, 双精度小数型<br /> .局部变量 剩余期数, 整数型<br /> .局部变量 新月数, 整数型<br /> .局部变量 新日期, 日期时间型<br /> <br /> ' 通过迭代计算剩余期数<br /> 剩余期数 ＝ 0<br /> .循环判断首 ()<br />     剩余期数 ＝ 剩余期数 ＋ 1<br />     新月数 ＝ 计算月供所需期数 (剩余本金, 月还款额, 剩余期数)<br /> .循环判断尾 (新月数 ＞ 剩余期数 且 剩余期数 ＜ 500)  ' 设置最大迭代次数<br /> <br /> 新日期 ＝ 增减时间 (提前还款日期, 6, 剩余期数)  ' 6表示月份<br /> 返回 (新日期)<br /> <br /> .子程序 计算月供所需期数, 整数型<br /> .参数 本金, 双精度小数型<br /> .参数 月供, 双精度小数型<br /> .参数 最大期数, 整数型<br /> .局部变量 测试本金, 双精度小数型<br /> .局部变量 i, 整数型<br /> <br /> 测试本金 ＝ 本金<br /> .计次循环首 (最大期数, i)<br />     测试本金 ＝ 测试本金 × (1 ＋ 月利率) － 月供<br />     .如果 (测试本金 ≤ 0)<br />         返回 (i)<br />     .如果结束<br /> .计次循环尾<br /> 返回 (最大期数)<br /> <br /> .子程序 计算剩余期限总利息, 双精度小数型<br /> .参数 剩余本金, 双精度小数型<br /> .参数 月还款额, 双精度小数型<br /> .局部变量 总还款, 双精度小数型<br /> .局部变量 剩余期数, 整数型<br /> <br /> 剩余期数 ＝ 计算月供所需期数 (剩余本金, 月还款额, 500)<br /> 总还款 ＝ 月还款额 × 剩余期数<br /> 返回 (总还款 － 剩余本金)<br /> <br /> .子程序 计算节省利息_期限缩短, 双精度小数型<br /> .参数 剩余本金, 双精度小数型<br /> .参数 月还款额, 双精度小数型<br /> .局部变量 原计划利息, 双精度小数型<br /> .局部变量 新计划利息, 双精度小数型<br /> <br /> 原计划利息 ＝ 计算剩余期限总利息 (剩余本金, 月还款额)<br /> 新计划利息 ＝ 计算剩余期限总利息 (剩余本金, 月还款额)  ' 这里需要根据实际新期限计算<br /> 返回 (原计划利息 － 新计划利息)<br /> <br /> .子程序 计算节省利息_月供减少, 双精度小数型<br /> .参数 剩余本金, 双精度小数型<br /> .参数 新月供, 双精度小数型<br /> .局部变量 原计划利息, 双精度小数型<br /> .局部变量 新计划利息, 双精度小数型<br /> .局部变量 剩余期数, 整数型<br /> <br /> 剩余期数 ＝ 原期限 － 取还款期数 ()<br /> 原计划利息 ＝ 计算剩余期限总利息 (剩余本金, 到数值 (编辑框_原来月还款额.内容))<br /> 新计划利息 ＝ 新月供 × 剩余期数 － 剩余本金<br /> 返回 (原计划利息 － 新计划利息)<br /> <br /> .子程序 取原计划最后日期, 日期时间型<br /> .局部变量 最后日期, 日期时间型<br /> <br /> 最后日期 ＝ 增减时间 (首次还款日期, 6, 原期限)  ' 6表示月份<br /> 返回 (最后日期)<br /> <br /> .子程序 _选择框_一次性还清_被单击<br /> .如果 (选择框_一次性还清.选中)<br />     编辑框_提前还款额.内容 ＝ "0"<br />     编辑框_提前还款额.禁止 ＝ 真<br /> .否则<br />     编辑框_提前还款额.内容 ＝ "4000"<br />     编辑框_提前还款额.禁止 ＝ 假<br /> .如果结束

云少i

加V：ly992489316

wh1234567

waweiggfnh 发表于 2025-11-23 02:40
[e=0].版本 2
.程序集 窗口程序集_启动窗口
.程序集变量 贷款总额, 双精度小数型

错误(37): 找不到指定的命令／子程序／Dll命令调用名称“求幂”。
编译现行易程序失败或被中止!

wh1234567

waweiggfnh 发表于 2025-11-23 02:40
[e=0].版本 2
.程序集 窗口程序集_启动窗口
.程序集变量 贷款总额, 双精度小数型

该月一次还款额：？元
下月起月还款额：？元
节省利息支出：？元
新的最后还款日期：？年？月
全部结果不对，期待老师看看是咋回事

wh1234567

waweiggfnh 发表于 2025-11-23 02:40
[e=0].版本 2
.程序集 窗口程序集_启动窗口
.程序集变量 贷款总额, 双精度小数型

已知条件：
贷款总额：25000元
原来贷款期限：15年
首次还款日期：2010年5月
提前还款日期：2019年11月
贷款年利率：4.8%
还款方式：1.一次性提前还清
提前还款额：0元
处理方式：1.期限缩短，月还款不变或2.期限不变，月还款减少
计算结果一个是：
原来月还款额：195.104元
已还款总额：22241.811元
已还利息额：8539.381元
该月一次还款额：11342.759元
下月起月还款额：0元
节省利息支出：1534.079元
新的最后还款日期：2019年11月

如果还款方式：1.部分提前还款
提前还款额：4000元
处理方式：1.期限缩短，月还款不变
计算如下：
原来月还款额：195.104元
已还款总额：22241.811元
已还利息额：8539.381元
该月一次还款额：4195.104元
下月起月还款额：192.499元
节省利息支出：981.761元
新的最后还款日期：2023年3月

如果还款方式：1.部分提前还款
提前还款额：4000元
处理方式：2.期限不变，月还款减少
计算如下：
原来月还款额：195.104元
已还款总额：22241.811元
已还利息额：8539.381元
该月一次还款额：4195.104元
下月起月还款额：122.656元
节省利息支出：586.427元
新的最后还款日期：2024年4月


应该结果是这样才对，期待老师帮忙修正一下哪里代码计算不对

wh1234567

云少i 发表于 2025-11-23 08:11
加V：ly992489316

老师帮看看计算不完全正确，楼上老师源码哪里需要修正？

RainCharm

wh1234567 发表于 2025-11-23 11:34
错误(37): 找不到指定的命令／子程序／Dll命令调用名称“求幂”。
编译现行易程序失败或被中止!
...

AI写的，易语言没有那个命令，

走一回

处理方式：1.期限缩短，月还款不变、2.期限不变，月还款减少。
1、是因为提前还款后，后期本息减少后，保持利率不变，其实是去掉提前还款的才缩短期限的吗？
2、期限不变，每月平均还款才减少的吗？

走一回

这太难了，理不清了