Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 1960|回复: 2

[求助]急!!以下语句实才看不懂,请教行家们。

[复制链接]
发表于 2008-2-18 17:03 | 显示全部楼层 |阅读模式
<p>以下语句是什么意思:特别是加了“∧”这几句。我是学了VFP,因要用到EXCEL,把DBF文件转化为XLS,并根据LQDYM不同进行插入分页符。在网上看到用以下代码,但不懂VBA,请多多指教。</p><p>SELECT Temp2<br/>&nbsp; GO TOP<br/>&nbsp; lnDw=Temp2.lqyxdm<br/>&nbsp; FOR lnCnt=1 TO RECCOUNT('Temp2')&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </p><p>SELECT Temp2<br/>&nbsp;∧&nbsp;&nbsp; GO lnCnt&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp; .RANGE('A'+TRANSFORM(lnCnt)).VALUE=Temp2.bmxh<br/>&nbsp;&nbsp;∧&nbsp; .RANGE('B'+TRANSFORM(lnCnt)).VALUE=Temp2.xm<br/>&nbsp;&nbsp;&nbsp; .RANGE('C'+TRANSFORM(lnCnt)).VALUE=Temp2.yxmc<br/>&nbsp;&nbsp;&nbsp; .RANGE('D'+TRANSFORM(lnCnt)).VALUE=Temp2.lqyxdm</p><p>&nbsp;&nbsp; <br/>IF lnDW!=Temp2.lqyxdm<br/>&nbsp;&nbsp;∧&nbsp;&nbsp;&nbsp; lcRange='A'+TRANSFORM(lnCnt)&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;∧&nbsp; .hpagebreaks.ADD(.RANGE(lcRange))&nbsp;&nbsp;&nbsp;</p><p>&nbsp;&nbsp;&nbsp; lnDw=Temp2.lqyxdm<br/>&nbsp;&nbsp; <br/>endif</p>
发表于 2008-2-19 10:58 | 显示全部楼层
回复

使用道具 举报

发表于 2008-3-11 13:44 | 显示全部楼层
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-5-6 03:20 , Processed in 0.222982 second(s), 6 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表