易语言调用WORD第二次格式不一样

15805313253

       本人绝对新手一枚，自己弄了一个小程序，主要是使用WORD组件生成所需要的文档，但在使用中发现，只有第一次生成的WORD文档格式正确（图二），第二次以后格式均不正确（图三）。。。由于水平拙劣，遍寻原因皆无果，实在是让人苦恼，所以来论坛找各位大神搭救，万分感谢！具体情况如下：

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

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

时钟1.时钟周期 ＝ 1000
信息框 (“欢迎使用合同助手”, 0, )
最大化按钮 ()

子程序名	返回值类型	公开	备 注
最大化按钮

最大化按钮 ＝ 假
最小化按钮 ()

子程序名	返回值类型	公开	备 注
最小化按钮

最小化按钮 ＝ 真

子程序名	返回值类型	公开	备 注
_时钟1_周期事件

标签26.标题 ＝ “现在是：” ＋ 到文本 (取现行时间 ())

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

变量名	类 型	静态	数组	备 注
m	日期时间型
o	整数型
b	文本型
a	日期时间型
n	日期时间型
c	文本型

如果真 (组合框3.内容 ＝ “租赁合同”)
如果真 (编辑框1.内容 ＝ “”)
信息框 (“决策会基站名称未填！”, 0, )
编辑框1.获取焦点 ()
返回 ()
如果真 (编辑框2.内容 ＝ “”)
信息框 (“甲方联系方式未填！”, 0, )
编辑框2.获取焦点 ()
返回 ()
如果真 (编辑框3.内容 ＝ “”)
信息框 (“甲方名称未填！”, 0, )
编辑框3.获取焦点 ()
返回 ()
如果真 (编辑框4.内容 ＝ “”)
信息框 (“甲方联系人未填！”, 0, )
编辑框4.获取焦点 ()
返回 ()
如果真 (编辑框5.内容 ＝ “”)
信息框 (“甲方地址未填！”, 0, )
编辑框5.获取焦点 ()
返回 ()
如果真 (编辑框6.内容 ＝ “”)
信息框 (“乙方联系人未填！”, 0, )
编辑框6.获取焦点 ()
返回 ()
如果真 (编辑框7.内容 ＝ “”)
信息框 (“乙方联系电话未填！”, 0, )
编辑框7.获取焦点 ()
返回 ()
如果真 (编辑框10.内容 ＝ “”)
信息框 (“甲方银行名称未填！”, 0, )
编辑框10.获取焦点 ()
返回 ()
如果真 (编辑框11.内容 ＝ “”)
信息框 (“甲方银行账号未填！”, 0, )
编辑框11.获取焦点 ()
返回 ()
如果真 (编辑框8.内容 ＝ “”)
信息框 (“租赁面积未填！”, 0, )
编辑框8.获取焦点 ()
返回 ()
如果真 (编辑框9.内容 ＝ “”)
信息框 (“年租金未填！”, 0, )
编辑框9.获取焦点 ()
返回 ()
如果真 (组合框1.内容 ＝ “”)
信息框 (“租赁年限未选择！”, 0, )
组合框1.获取焦点 ()
返回 ()
如果真 (组合框3.内容 ＝ “”)
信息框 (“合同类型未选择！”, 0, )
组合框3.获取焦点 ()
返回 ()

Word程序1.创建 ()
Word程序1.显示 ＝ 真
Word文档集1.置程序 (Word程序1, 真)
Word文档集1.右边界距离 ＝ 63.5
Word文档集1.左边界距离 ＝ 70.5
Word文档集1.东亚字体名 ＝ #宋体
Word文档集1.页行数 ＝ 29
' 租赁合同
Word文档集1.字体大小 ＝ 12
Word文档集1.字体加粗 ＝ 2
Word文档集1.输入文本 (0, “合同编号：【                                 】” ＋ #换行符 ＋ #换行符 ＋ #换行符 ＋ #换行符 ＋ #换行符 ＋ #换行符 ＋ #换行符 ＋ #换行符 ＋ #换行符 )
Word文档集1.字体大小 ＝ 24
Word文档集1.对齐方式 ＝ 1
Word文档集1.字体加粗 ＝ 4
Word文档集1.输入文本 (0, “ ” ＋ “【” ＋ 编辑框1.内容 ＋ “】” ＋ “房屋租赁合同” ＋ #换行符 ＋ #换行符 ＋ #换行符 ＋ #换行符 ＋ #换行符 ＋ #换行符 ＋ #换行符 )
Word文档集1.字体大小 ＝ 15
Word文档集1.对齐方式 ＝ 0
Word文档集1.字体加粗 ＝ 2
Word文档集1.输入文本 (0, “” ＋ “甲方：” ＋ “【” ＋ 编辑框3.内容 ＋ “】” ＋ #换行符 )
Word文档集1.字体大小 ＝ 15
Word文档集1.对齐方式 ＝ 0
Word文档集1.字体加粗 ＝ 2
Word文档集1.输入文本 (0, “乙方：【秦淮河边品儒雅淮扬菜情怀】” ＋ #换行符 ＋ #换行符 ＋ #换行符 ＋ #换行符 ＋ #换行符 )
Word文档集1.字体大小 ＝ 12
Word文档集1.对齐方式 ＝ 0
Word文档集1.字体加粗 ＝ 2
Word文档集1.输入文本 (0, “” ＋ “甲方(出租方)：” ＋ “【” ＋ 编辑框3.内容 ＋ “】” ＋ #换行符 )
Word文档集1.字体大小 ＝ 12
Word文档集1.对齐方式 ＝ 0
Word文档集1.字体加粗 ＝ 0
Word文档集1.输入文本 (0, “” ＋ “地    址：” ＋ “【” ＋ 编辑框5.内容 ＋ “】” ＋ “负责人：” ＋ “【” ＋ 编辑框4.内容 ＋ “】” ＋ #换行符 )
Word文档集1.输入文本 (0, “” ＋ “联系人：” ＋ “【” ＋ 编辑框4.内容 ＋ “】” ＋ “ 电话：” ＋ “【” ＋ 编辑框2.内容 ＋ “】” ＋ “邮政编码：” ＋ “【” ＋ “/” ＋ “】” ＋ #换行符 )
Word文档集1.字体大小 ＝ 12
Word文档集1.对齐方式 ＝ 0
Word文档集1.字体加粗 ＝ 2
Word文档集1.输入文本 (0, “乙方（承租方）：【无论是名字还是环境都相当淡雅别致】” ＋ #换行符 )
Word文档集1.字体大小 ＝ 12
Word文档集1.对齐方式 ＝ 0
Word文档集1.字体加粗 ＝ 0
Word文档集1.输入文本 (0, “地  址：【淡淡的儒雅格调是门口的】.     法定代表人或负责人：【XXXXX】” ＋ #换行符 )
Word文档集1.输入文本 (0, “” ＋ “联系人：” ＋ “【” ＋ 编辑框6.内容 ＋ “】” ＋ “                       电话：” ＋ “【” ＋ 编辑框7.内容 ＋ “】” ＋ #换行符 )
Word文档集1.输入文本 (0, “” ＋ “甲、乙双方经协商一致，就租赁” ＋ “【” ＋ 编辑框5.内容 ＋ “】” ＋ “事宜立约如下，以兹共同遵守：” ＋ #换行符 )
Word文档集1.字体大小 ＝ 14
Word文档集1.对齐方式 ＝ 0
Word文档集1.字体加粗 ＝ 2
Word文档集1.输入文本 (0, “第一条  租赁物及其他” ＋ #换行符 )
Word文档集1.字体大小 ＝ 12
Word文档集1.对齐方式 ＝ 0
Word文档集1.字体加粗 ＝ 0
Word文档集1.输入文本 (0, “1.1. 房屋的基本情况如下： ” ＋ #换行符 )
Word文档集1.输入文本 (0, “” ＋ “1.1.1  房屋的具体位置：” ＋ “【” ＋ 编辑框5.内容 ＋ “】;” ＋ #换行符 )
Word文档集1.输入文本 (0, “” ＋ “1.1.2  租赁面积” ＋ “【” ＋ 编辑框8.内容 ＋ “】” ＋ “平方米” ＋ #换行符 )
Word文档集1.输入文本 (0, “1.2  甲方承诺：” ＋ #换行符 )
Word文档集1.输入文本 (0, “1.2.1的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。淮扬菜最” ＋ #换行符 )
Word文档集1.输入文本 (0, “     的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。淮扬菜最 ” ＋ #换行符 )
Word文档集1.输入文本 (0, “     的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。淮扬菜最 ” ＋ #换行符 )
Word文档集1.输入文本 (0, “     的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。淮扬菜最/ ” ＋ #换行符 )
Word文档集1.输入文本 (0, “     的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。淮扬菜最 ” ＋ #换行符 )
Word文档集1.输入文本 (0, “     的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。淮扬菜最。 ” ＋ #换行符 )
Word文档集1.输入文本 (0, “1.2.2 的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。淮扬菜最” ＋ #换行符 )
Word文档集1.输入文本 (0, “     的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。淮扬菜最。” ＋ #换行符 )
Word文档集1.输入文本 (0, “     的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。淮扬菜最” ＋ #换行符 )
Word文档集1.输入文本 (0, “     的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。” ＋ #换行符 )
Word文档集1.输入文本 (0, “1.2.3的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。” ＋ #换行符 )
Word文档集1.字体大小 ＝ 14
Word文档集1.对齐方式 ＝ 0
Word文档集1.字体加粗 ＝ 2
Word文档集1.输入文本 (0, “第二条  租赁物用途” ＋ #换行符 )
Word文档集1.字体大小 ＝ 12
Word文档集1.对齐方式 ＝ 0
Word文档集1.字体加粗 ＝ 0
Word文档集1.输入文本 (0, “2.1  的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。淮扬菜最” ＋ #换行符 )
Word文档集1.输入文本 (0, “     的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。淮扬菜最 ” ＋ #换行符 )
Word文档集1.输入文本 (0, “     的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。 ” ＋ #换行符 )
Word文档集1.字体大小 ＝ 14
Word文档集1.对齐方式 ＝ 0
Word文档集1.字体加粗 ＝ 2
Word文档集1.输入文本 (0, “第三条  租赁期限” ＋ #换行符 )
Word文档集1.字体大小 ＝ 12
Word文档集1.对齐方式 ＝ 0
Word文档集1.字体加粗 ＝ 0
o ＝ 组合框1.现行选中项 ＋ 1
n ＝ 到时间 (日期框1.今天)
m ＝ 到时间 (增减时间 (日期框1.今天, #年份, o))
a ＝ 到时间 (增减时间 (日期框1.今天, #日, -1))
Word文档集1.输入文本 (0, “” ＋ “3.1  租赁期限” ＋ “【” ＋ 到文本 (取年份 (n)) ＋ “】” ＋ “年” ＋ “【” ＋ 到文本 (取月份 (n)) ＋ “】” ＋ “月” ＋ “【” ＋ 到文本 (取日 (n)) ＋ “】” ＋ “日” ＋ “起至” ＋ “【” ＋ 到文本 (取年份 (m)) ＋ “】” ＋ “年” ＋ “【” ＋ 到文本 (取月份 (m)) ＋ “】” ＋ “月” ＋ “【” ＋ 到文本 (取日 (a)) ＋ “】” ＋ “日” ＋ #换行符 )
Word文档集1.输入文本 (0, “     的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。” ＋ #换行符 )
Word文档集1.字体大小 ＝ 14
Word文档集1.对齐方式 ＝ 0
Word文档集1.字体加粗 ＝ 2
Word文档集1.输入文本 (0, “第四条  租金及相关费用支付” ＋ #换行符 )
Word文档集1.字体大小 ＝ 12
Word文档集1.对齐方式 ＝ 0
Word文档集1.字体加粗 ＝ 0
b ＝ 到文本 (到数值 (编辑框9.内容) × o)
c ＝ 到文本 (到数值 (编辑框9.内容) × 2)
Word文档集1.输入文本 (0, “” ＋ “4.1  租金为每年” ＋ “【” ＋ 编辑框9.内容 ＋ “】” ＋ “元，租赁期限内的租金合计为人民币” ＋ “【” ＋ b ＋ “】” ＋ “元，” ＋ “（大写：” ＋ #换行符 ＋ “    ” ＋ 到文本 (数值到金额 (到数值 (b), 假)) ＋ “）。” ＋ “上述租金为含税价，租赁期间租金不得做调整。” ＋ #换行符 )
' 判断支付方式
如果真 (组合框2.内容 ＝ “一次性”)
Word文档集1.输入文本 (0, “” ＋ “4.2  租金按” ＋ “【” ＋ 组合框2.内容 ＋ “】” ＋ “结算，支付时间为” ＋ “【” ＋ “甲方提供发票30日内” ＋ “】” ＋ “支付租金” ＋ #换行符 ＋ “    ” ＋ “【” ＋ b ＋ “】” ＋ “元。” ＋ “由甲方提供” ＋ #引号 ＋ “场地/房屋租赁费” ＋ #引号 ＋ “增值税专用发票。” ＋ #换行符 )
如果真 (组合框2.内容 ≠ “一次性”)
如果真 (组合框1.现行选中项 ＝ 0)  ' 一次性
组合框2.现行选中项 ＝ 0
Word文档集1.输入文本 (0, “” ＋ “4.2  租金按” ＋ “【” ＋ 组合框2.内容 ＋ “】” ＋ “结算，支付时间为” ＋ “【” ＋ “甲方提供发票30日内” ＋ “】” ＋ “支付租金” ＋ #换行符 ＋ “    ” ＋ “【” ＋ b ＋ “】” ＋ “元。” ＋ “由甲方提供” ＋ #引号 ＋ “场地/房屋租赁费” ＋ #引号 ＋ “增值税专用发票。” ＋ #换行符 )
如果真 (组合框1.现行选中项 ＝ 1)  ' 一次性
组合框2.现行选中项 ＝ 0
Word文档集1.输入文本 (0, “” ＋ “4.2  租金按” ＋ “【” ＋ 组合框2.内容 ＋ “】” ＋ “结算，支付时间为” ＋ “【” ＋ “甲方提供发票30日内” ＋ “】” ＋ “支付租金” ＋ #换行符 ＋ “    ” ＋ “【” ＋ b ＋ “】” ＋ “元。” ＋ “由甲方提供” ＋ #引号 ＋ “场地/房屋租赁费” ＋ #引号 ＋ “增值税专用发票。” ＋ #换行符 )
如果真 (组合框1.现行选中项 ＝ 2)  ' 2/1
组合框2.现行选中项 ＝ 1
Word文档集1.输入文本 (0, “” ＋ “4.2  租金按” ＋ “【” ＋ 组合框2.内容 ＋ “】” ＋ “结算，首次支付时间为” ＋ “【” ＋ “合同签订后” ＋ “】” ＋ “支付前两年租金” ＋ “【” ＋ c ＋ “】” ＋ #换行符 ＋ “    ” ＋ “元” ＋ “(” ＋ 到文本 (数值到金额 (到数值 (c), 假)) ＋ “) 。” ＋ “到” ＋ “【” ＋ 到文本 (取年份 (到时间 (增减时间 (日期框1.今天, #年份, 2)))) ＋ “】” ＋ “年” ＋ “【” ＋ 到文本 (取月份 (n)) ＋ “】” ＋ “月支付后一年租金” ＋ “【” ＋ 编辑框9.内容 ＋ “】” ＋ “元” ＋ #换行符 ＋ “    ” ＋ “(” ＋ 到文本 (数值到金额 (到数值 (编辑框9.内容), 假)) ＋ “) 。” ＋ “由甲方提供” ＋ #引号 ＋ “场地/房屋租赁费” ＋ #引号 ＋ “增值税专用发票。” ＋ #换行符 )
如果真 (组合框1.现行选中项 ＝ 3)  ' 2/2
组合框2.现行选中项 ＝ 2
Word文档集1.输入文本 (0, “” ＋ “4.2  租金按” ＋ “【” ＋ 组合框2.内容 ＋ “】” ＋ “结算，首次支付时间为” ＋ “【” ＋ “合同签订后” ＋ “】” ＋ “支付前两年租金” ＋ “【” ＋ c ＋ “】” ＋ #换行符 ＋ “    ” ＋ “元” ＋ “(” ＋ 到文本 (数值到金额 (到数值 (c), 假)) ＋ “) 。” ＋ “到” ＋ “【” ＋ 到文本 (取年份 (到时间 (增减时间 (日期框1.今天, #年份, 2)))) ＋ “】” ＋ “年” ＋ “【” ＋ 到文本 (取月份 (n)) ＋ “】” ＋ “月支付后两年租金” ＋ “【” ＋ c ＋ “】” ＋ “元” ＋ #换行符 ＋ “    ” ＋ “(” ＋ 到文本 (数值到金额 (到数值 (c), 假)) ＋ “) 。” ＋ “由甲方提供” ＋ #引号 ＋ “场地/房屋租赁费” ＋ #引号 ＋ “增值税专用发票。” ＋ #换行符 )
如果真 (组合框1.现行选中项 ＝ 4)  ' 2/2/1
组合框2.现行选中项 ＝ 3

i支持库列表	支持库注释
eWord2000	WORD2000支持库

.版本 2<br /> .支持库 eWord2000<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 时钟1.时钟周期 ＝ 1000<br /> 信息框 (“欢迎使用合同助手”, 0, )<br /> <br /> <br /> <br /> 最大化按钮 ()<br /> <br /> .子程序 最大化按钮<br /> <br /> 最大化按钮 ＝ 假<br /> <br /> 最小化按钮 ()<br /> <br /> .子程序 最小化按钮<br /> <br /> 最小化按钮 ＝ 真<br /> <br /> .子程序 _时钟1_周期事件<br /> <br /> 标签26.标题 ＝ “现在是：” ＋ 到文本 (取现行时间 ())<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 m, 日期时间型<br /> .局部变量 o, 整数型<br /> .局部变量 b, 文本型<br /> .局部变量 a, 日期时间型<br /> .局部变量 n, 日期时间型<br /> .局部变量 c, 文本型<br /> <br /> .如果真 (组合框3.内容 ＝ “租赁合同”)<br />     .如果真 (编辑框1.内容 ＝ “”)<br />         信息框 (“决策会基站名称未填！”, 0, )<br />         编辑框1.获取焦点 ()<br />         返回 ()<br />     .如果真结束<br />     .如果真 (编辑框2.内容 ＝ “”)<br />         信息框 (“甲方联系方式未填！”, 0, )<br />         编辑框2.获取焦点 ()<br />         返回 ()<br />     .如果真结束<br />     .如果真 (编辑框3.内容 ＝ “”)<br />         信息框 (“甲方名称未填！”, 0, )<br />         编辑框3.获取焦点 ()<br />         返回 ()<br />     .如果真结束<br />     .如果真 (编辑框4.内容 ＝ “”)<br />         信息框 (“甲方联系人未填！”, 0, )<br />         编辑框4.获取焦点 ()<br />         返回 ()<br />     .如果真结束<br />     .如果真 (编辑框5.内容 ＝ “”)<br />         信息框 (“甲方地址未填！”, 0, )<br />         编辑框5.获取焦点 ()<br />         返回 ()<br />     .如果真结束<br />     .如果真 (编辑框6.内容 ＝ “”)<br />         信息框 (“乙方联系人未填！”, 0, )<br />         编辑框6.获取焦点 ()<br />         返回 ()<br />     .如果真结束<br />     .如果真 (编辑框7.内容 ＝ “”)<br />         信息框 (“乙方联系电话未填！”, 0, )<br />         编辑框7.获取焦点 ()<br />         返回 ()<br />     .如果真结束<br />     .如果真 (编辑框10.内容 ＝ “”)<br />         信息框 (“甲方银行名称未填！”, 0, )<br />         编辑框10.获取焦点 ()<br />         返回 ()<br />     .如果真结束<br />     .如果真 (编辑框11.内容 ＝ “”)<br />         信息框 (“甲方银行账号未填！”, 0, )<br />         编辑框11.获取焦点 ()<br />         返回 ()<br />     .如果真结束<br />     .如果真 (编辑框8.内容 ＝ “”)<br />         信息框 (“租赁面积未填！”, 0, )<br />         编辑框8.获取焦点 ()<br />         返回 ()<br />     .如果真结束<br />     .如果真 (编辑框9.内容 ＝ “”)<br />         信息框 (“年租金未填！”, 0, )<br />         编辑框9.获取焦点 ()<br />         返回 ()<br />     .如果真结束<br />     .如果真 (组合框1.内容 ＝ “”)<br />         信息框 (“租赁年限未选择！”, 0, )<br />         组合框1.获取焦点 ()<br />         返回 ()<br />     .如果真结束<br />     .如果真 (组合框3.内容 ＝ “”)<br />         信息框 (“合同类型未选择！”, 0, )<br />         组合框3.获取焦点 ()<br />         返回 ()<br />     .如果真结束<br /> <br /> <br />     Word程序1.创建 ()<br /> <br />     Word程序1.显示 ＝ 真<br /> <br />     Word文档集1.置程序 (Word程序1, 真)<br /> <br />     Word文档集1.右边界距离 ＝ 63.5<br /> <br />     Word文档集1.左边界距离 ＝ 70.5<br /> <br />     Word文档集1.东亚字体名 ＝ #宋体<br /> <br />     Word文档集1.页行数 ＝ 29<br /> <br /> <br />     ' 租赁合同<br />     Word文档集1.字体大小 ＝ 12<br />     Word文档集1.字体加粗 ＝ 2<br />     Word文档集1.输入文本 (0, “合同编号：【                                 】” ＋ #换行符 ＋ #换行符 ＋ #换行符 ＋ #换行符 ＋ #换行符 ＋ #换行符 ＋ #换行符 ＋ #换行符 ＋ #换行符)<br />     Word文档集1.字体大小 ＝ 24<br />     Word文档集1.对齐方式 ＝ 1<br />     Word文档集1.字体加粗 ＝ 4<br />     Word文档集1.输入文本 (0, “ ” ＋ “【” ＋ 编辑框1.内容 ＋ “】” ＋ “房屋租赁合同” ＋ #换行符 ＋ #换行符 ＋ #换行符 ＋ #换行符 ＋ #换行符 ＋ #换行符 ＋ #换行符)<br />     Word文档集1.字体大小 ＝ 15<br />     Word文档集1.对齐方式 ＝ 0<br />     Word文档集1.字体加粗 ＝ 2<br />     Word文档集1.输入文本 (0, “” ＋ “甲方：” ＋ “【” ＋ 编辑框3.内容 ＋ “】” ＋ #换行符)<br />     Word文档集1.字体大小 ＝ 15<br />     Word文档集1.对齐方式 ＝ 0<br />     Word文档集1.字体加粗 ＝ 2<br />     Word文档集1.输入文本 (0, “乙方：【秦淮河边品儒雅淮扬菜情怀】” ＋ #换行符 ＋ #换行符 ＋ #换行符 ＋ #换行符 ＋ #换行符)<br />     Word文档集1.字体大小 ＝ 12<br />     Word文档集1.对齐方式 ＝ 0<br />     Word文档集1.字体加粗 ＝ 2<br /> <br />     Word文档集1.输入文本 (0, “” ＋ “甲方(出租方)：” ＋ “【” ＋ 编辑框3.内容 ＋ “】” ＋ #换行符)<br />     Word文档集1.字体大小 ＝ 12<br />     Word文档集1.对齐方式 ＝ 0<br />     Word文档集1.字体加粗 ＝ 0<br />     Word文档集1.输入文本 (0, “” ＋ “地    址：” ＋ “【” ＋ 编辑框5.内容 ＋ “】” ＋ “负责人：” ＋ “【” ＋ 编辑框4.内容 ＋ “】” ＋ #换行符)<br />     Word文档集1.输入文本 (0, “” ＋ “联系人：” ＋ “【” ＋ 编辑框4.内容 ＋ “】” ＋ “ 电话：” ＋ “【” ＋ 编辑框2.内容 ＋ “】” ＋ “邮政编码：” ＋ “【” ＋ “/” ＋ “】” ＋ #换行符)<br />     Word文档集1.字体大小 ＝ 12<br />     Word文档集1.对齐方式 ＝ 0<br />     Word文档集1.字体加粗 ＝ 2<br />     Word文档集1.输入文本 (0, “乙方（承租方）：【无论是名字还是环境都相当淡雅别致】” ＋ #换行符)<br />     Word文档集1.字体大小 ＝ 12<br />     Word文档集1.对齐方式 ＝ 0<br />     Word文档集1.字体加粗 ＝ 0<br />     Word文档集1.输入文本 (0, “地  址：【淡淡的儒雅格调是门口的】.     法定代表人或负责人：【XXXXX】” ＋ #换行符)<br />     Word文档集1.输入文本 (0, “” ＋ “联系人：” ＋ “【” ＋ 编辑框6.内容 ＋ “】” ＋ “                       电话：” ＋ “【” ＋ 编辑框7.内容 ＋ “】” ＋ #换行符)<br />     Word文档集1.输入文本 (0, “” ＋ “甲、乙双方经协商一致，就租赁” ＋ “【” ＋ 编辑框5.内容 ＋ “】” ＋ “事宜立约如下，以兹共同遵守：” ＋ #换行符)<br />     Word文档集1.字体大小 ＝ 14<br />     Word文档集1.对齐方式 ＝ 0<br />     Word文档集1.字体加粗 ＝ 2<br />     Word文档集1.输入文本 (0, “第一条  租赁物及其他” ＋ #换行符)<br />     Word文档集1.字体大小 ＝ 12<br />     Word文档集1.对齐方式 ＝ 0<br />     Word文档集1.字体加粗 ＝ 0<br />     Word文档集1.输入文本 (0, “1.1. 房屋的基本情况如下： ” ＋ #换行符)<br />     Word文档集1.输入文本 (0, “” ＋ “1.1.1  房屋的具体位置：” ＋ “【” ＋ 编辑框5.内容 ＋ “】;” ＋ #换行符)<br />     Word文档集1.输入文本 (0, “” ＋ “1.1.2  租赁面积” ＋ “【” ＋ 编辑框8.内容 ＋ “】” ＋ “平方米” ＋ #换行符)<br />     Word文档集1.输入文本 (0, “1.2  甲方承诺：” ＋ #换行符)<br />     Word文档集1.输入文本 (0, “1.2.1的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。淮扬菜最” ＋ #换行符)<br />     Word文档集1.输入文本 (0, “     的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。淮扬菜最 ” ＋ #换行符)<br />     Word文档集1.输入文本 (0, “     的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。淮扬菜最 ” ＋ #换行符)<br />     Word文档集1.输入文本 (0, “     的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。淮扬菜最/ ” ＋ #换行符)<br />     Word文档集1.输入文本 (0, “     的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。淮扬菜最 ” ＋ #换行符)<br />     Word文档集1.输入文本 (0, “     的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。淮扬菜最。 ” ＋ #换行符)<br />     Word文档集1.输入文本 (0, “1.2.2 的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。淮扬菜最” ＋ #换行符)<br />     Word文档集1.输入文本 (0, “     的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。淮扬菜最。” ＋ #换行符)<br />     Word文档集1.输入文本 (0, “     的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。淮扬菜最” ＋ #换行符)<br />     Word文档集1.输入文本 (0, “     的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。” ＋ #换行符)<br />     Word文档集1.输入文本 (0, “1.2.3的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。” ＋ #换行符)<br /> <br />     Word文档集1.字体大小 ＝ 14<br />     Word文档集1.对齐方式 ＝ 0<br />     Word文档集1.字体加粗 ＝ 2<br />     Word文档集1.输入文本 (0, “第二条  租赁物用途” ＋ #换行符)<br />     Word文档集1.字体大小 ＝ 12<br />     Word文档集1.对齐方式 ＝ 0<br />     Word文档集1.字体加粗 ＝ 0<br />     Word文档集1.输入文本 (0, “2.1  的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。淮扬菜最” ＋ #换行符)<br />     Word文档集1.输入文本 (0, “     的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。淮扬菜最 ” ＋ #换行符)<br />     Word文档集1.输入文本 (0, “     的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。 ” ＋ #换行符)<br />     Word文档集1.字体大小 ＝ 14<br />     Word文档集1.对齐方式 ＝ 0<br />     Word文档集1.字体加粗 ＝ 2<br />     Word文档集1.输入文本 (0, “第三条  租赁期限” ＋ #换行符)<br />     Word文档集1.字体大小 ＝ 12<br />     Word文档集1.对齐方式 ＝ 0<br />     Word文档集1.字体加粗 ＝ 0<br />     o ＝ 组合框1.现行选中项 ＋ 1<br />     n ＝ 到时间 (日期框1.今天)<br />     m ＝ 到时间 (增减时间 (日期框1.今天, #年份, o))<br />     a ＝ 到时间 (增减时间 (日期框1.今天, #日, -1))<br />     Word文档集1.输入文本 (0, “” ＋ “3.1  租赁期限” ＋ “【” ＋ 到文本 (取年份 (n)) ＋ “】” ＋ “年” ＋ “【” ＋ 到文本 (取月份 (n)) ＋ “】” ＋ “月” ＋ “【” ＋ 到文本 (取日 (n)) ＋ “】” ＋ “日” ＋ “起至” ＋ “【” ＋ 到文本 (取年份 (m)) ＋ “】” ＋ “年” ＋ “【” ＋ 到文本 (取月份 (m)) ＋ “】” ＋ “月” ＋ “【” ＋ 到文本 (取日 (a)) ＋ “】” ＋ “日” ＋ #换行符)<br />     Word文档集1.输入文本 (0, “     的绿色植物、是墙上的名人字画，缓步走来，第一感觉便是惬意舒适。” ＋ #换行符)<br />     Word文档集1.字体大小 ＝ 14<br />     Word文档集1.对齐方式 ＝ 0<br />     Word文档集1.字体加粗 ＝ 2<br />     Word文档集1.输入文本 (0, “第四条  租金及相关费用支付” ＋ #换行符)<br />     Word文档集1.字体大小 ＝ 12<br />     Word文档集1.对齐方式 ＝ 0<br />     Word文档集1.字体加粗 ＝ 0<br />     b ＝ 到文本 (到数值 (编辑框9.内容) × o)<br />     c ＝ 到文本 (到数值 (编辑框9.内容) × 2)<br />     Word文档集1.输入文本 (0, “” ＋ “4.1  租金为每年” ＋ “【” ＋ 编辑框9.内容 ＋ “】” ＋ “元，租赁期限内的租金合计为人民币” ＋ “【” ＋ b ＋ “】” ＋ “元，” ＋ “（大写：” ＋ #换行符 ＋ “    ” ＋ 到文本 (数值到金额 (到数值 (b), 假)) ＋ “）。” ＋ “上述租金为含税价，租赁期间租金不得做调整。” ＋ #换行符)<br /> <br />     ' 判断支付方式<br /> <br />     .如果真 (组合框2.内容 ＝ “一次性”)<br />         Word文档集1.输入文本 (0, “” ＋ “4.2  租金按” ＋ “【” ＋ 组合框2.内容 ＋ “】” ＋ “结算，支付时间为” ＋ “【” ＋ “甲方提供发票30日内” ＋ “】” ＋ “支付租金” ＋ #换行符 ＋ “    ” ＋ “【” ＋ b ＋ “】” ＋ “元。” ＋ “由甲方提供” ＋ #引号 ＋ “场地/房屋租赁费” ＋ #引号 ＋ “增值税专用发票。” ＋ #换行符)<br />     .如果真结束<br />     .如果真 (组合框2.内容 ≠ “一次性”)<br />         .如果真 (组合框1.现行选中项 ＝ 0)  ' 一次性<br />             组合框2.现行选中项 ＝ 0<br />             Word文档集1.输入文本 (0, “” ＋ “4.2  租金按” ＋ “【” ＋ 组合框2.内容 ＋ “】” ＋ “结算，支付时间为” ＋ “【” ＋ “甲方提供发票30日内” ＋ “】” ＋ “支付租金” ＋ #换行符 ＋ “    ” ＋ “【” ＋ b ＋ “】” ＋ “元。” ＋ “由甲方提供” ＋ #引号 ＋ “场地/房屋租赁费” ＋ #引号 ＋ “增值税专用发票。” ＋ #换行符)<br />         .如果真结束<br />         .如果真 (组合框1.现行选中项 ＝ 1)  ' 一次性<br />             组合框2.现行选中项 ＝ 0<br />             Word文档集1.输入文本 (0, “” ＋ “4.2  租金按” ＋ “【” ＋ 组合框2.内容 ＋ “】” ＋ “结算，支付时间为” ＋ “【” ＋ “甲方提供发票30日内” ＋ “】” ＋ “支付租金” ＋ #换行符 ＋ “    ” ＋ “【” ＋ b ＋ “】” ＋ “元。” ＋ “由甲方提供” ＋ #引号 ＋ “场地/房屋租赁费” ＋ #引号 ＋ “增值税专用发票。” ＋ #换行符)<br />         .如果真结束<br />         .如果真 (组合框1.现行选中项 ＝ 2)  ' 2/1<br />             组合框2.现行选中项 ＝ 1<br />             Word文档集1.输入文本 (0, “” ＋ “4.2  租金按” ＋ “【” ＋ 组合框2.内容 ＋ “】” ＋ “结算，首次支付时间为” ＋ “【” ＋ “合同签订后” ＋ “】” ＋ “支付前两年租金” ＋ “【” ＋ c ＋ “】” ＋ #换行符 ＋ “    ” ＋ “元” ＋ “(” ＋ 到文本 (数值到金额 (到数值 (c), 假)) ＋ “) 。” ＋ “到” ＋ “【” ＋ 到文本 (取年份 (到时间 (增减时间 (日期框1.今天, #年份, 2)))) ＋ “】” ＋ “年” ＋ “【” ＋ 到文本 (取月份 (n)) ＋ “】” ＋ “月支付后一年租金” ＋ “【” ＋ 编辑框9.内容 ＋ “】” ＋ “元” ＋ #换行符 ＋ “    ” ＋ “(” ＋ 到文本 (数值到金额 (到数值 (编辑框9.内容), 假)) ＋ “) 。” ＋ “由甲方提供” ＋ #引号 ＋ “场地/房屋租赁费” ＋ #引号 ＋ “增值税专用发票。” ＋ #换行符)<br />         .如果真结束<br />         .如果真 (组合框1.现行选中项 ＝ 3)  ' 2/2<br />             组合框2.现行选中项 ＝ 2<br />             Word文档集1.输入文本 (0, “” ＋ “4.2  租金按” ＋ “【” ＋ 组合框2.内容 ＋ “】” ＋ “结算，首次支付时间为” ＋ “【” ＋ “合同签订后” ＋ “】” ＋ “支付前两年租金” ＋ “【” ＋ c ＋ “】” ＋ #换行符 ＋ “    ” ＋ “元” ＋ “(” ＋ 到文本 (数值到金额 (到数值 (c), 假)) ＋ “) 。” ＋ “到” ＋ “【” ＋ 到文本 (取年份 (到时间 (增减时间 (日期框1.今天, #年份, 2)))) ＋ “】” ＋ “年” ＋ “【” ＋ 到文本 (取月份 (n)) ＋ “】” ＋ “月支付后两年租金” ＋ “【” ＋ c ＋ “】” ＋ “元” ＋ #换行符 ＋ “    ” ＋ “(” ＋ 到文本 (数值到金额 (到数值 (c), 假)) ＋ “) 。” ＋ “由甲方提供” ＋ #引号 ＋ “场地/房屋租赁费” ＋ #引号 ＋ “增值税专用发票。” ＋ #换行符)<br />         .如果真结束<br />         .如果真 (组合框1.现行选中项 ＝ 4)  ' 2/2/1<br />             组合框2.现行选中项 ＝ 3<br />

15805313253

好心人呢。。。。

15805313253

刚不知道怎么添加这个，添加上有没有大神给解决解决。。。

15805313253

别沉啊  顶住！

15805313253

老铁们，走一波，刷起来啊。。。。

15805313253

啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊

15805313253

我一直都在  在线等啊  啊啊啊啊啊啊啊啊啊啊啊啊啊啊

15805313253

晕+_+  到底行不行啊，第一论坛啊

15805313253

这个问题困扰了作为菜鸟的我很久，一直以为是代码哪里不对，琢磨了很长时间最终还是找到原因了。。。之所以自己回答是因为如果还有菜鸟遇到类似问题，希望能给他们解决一点问题，毕竟写这个东西都是为了方便工作。之所以会格式出错，因为我给调用的WORD页边距、页行数进行了赋值，但第二次运行时WORD会默认使用 Normal 模板，所以会造成乱码。需要将WORD Normal 模板的页边距、页行数设置成程序所赋的值，即可解决。

热土流风

非常感谢！