新手求助一个简单问题。。。 - VFP论坛

| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 |

编程论坛 → 数据库技术 → 『 VFP论坛』 → 新手求助一个简单问题。。。

我的收件箱(0)

欢迎加入我们，一同切磋技术

共有 540 人关注过本帖

标题：新手求助一个简单问题。。。

只看楼主加入收藏

calin

等　级：论坛游民
帖　子：108
专家分：50
注　册：2010-4-11
结帖率：90.32%

楼主

已结贴√ 问题点数：20 回复次数：5

新手求助一个简单问题。。。

Z1=730903547X
当我用XJXLS1.CELLS(1,1).VALUE=Z1写入表格时（已创建EXCEL对象XJXLS1）
只写入了730903547
最后一个“X”未能写入。。
怎么回事呢？

搜索更多相关主题的帖子: 简单问题　

2010-06-11 17:58

hu9jj

来　自：红土地
等　级：贵宾
威　望：400
帖　子：11857
专家分：43421
注　册：2006-5-13

第 2 楼

得分:5

试试：
Z1="730903547X"

活到老，学到老！http://www.（该域名已经被ISP盗卖了）E-mail:hu-jj@

2010-06-11 21:07

calin

等　级：论坛游民
帖　子：108
专家分：50
注　册：2010-4-11

第 3 楼

得分:0

IF M1=13
G1=10*VAL(SUBSTR(K2,4,1))+9*VAL(SUBSTR(K2,5,1));
+8*VAL(SUBSTR(K2,6,1))+7*VAL(SUBSTR(K2,7,1))+6*VAL(SUBSTR(K2,8,1))+5*VAL(SUBSTR(K2,9,1));
+4*VAL(SUBSTR(K2,10,1))+3*VAL(SUBSTR(K2,11,1))+2*VAL(SUBSTR(K2,12,1))
M2=ALLTRIM(STR(11-MOD(G1,11)))

DO CASE
CASE M2="10"
Z1=ALLTRIM(ALLTRIM(SUBSTR(K2,4,9))+"X")
CASE M2="11"
Z1=ALLTRIM(ALLTRIM(SUBSTR(K2,4,9))+"0")
OTHERWISE
Z1=ALLTRIM(ALLTRIM(SUBSTR(K2,4,9))+ALLTRIM(M2))
ENDCASE
XJXLS1.CELLS(i,1).VALUE=VAL(Z1)
ENDIF
二楼哥哥，
我的Z1是根据上面CASE M2=“10”
算出来的，
怎办？

2010-06-12 08:13