9664.html

来自「VB技巧问答10000例,是一个教程」· HTML 代码 · 共 27 行

HTML

27 行

<html>
  <head>
    <title>Re: 如何用crystalreport,限定每一次列印的资料笔数?</title>
  </head>
  <body bgcolor="#FFFFFF" vlink="#808080">
    <center>
      <h1>Re: 如何用crystalreport,限定每一次列印的资料笔数?</h1>
    </center>
<hr size=7 width=75%>

<hr size=7 width=75%><p>
Posted by AndyLin on January 29, 1999 at 09:45:04:<p>
In Reply to: <a href="9644.html">Re: 如何用crystalreport,限定每一次列印的资料笔数?</a> posted by help on January 28, 1999 at 17:29:01:<p>
: : : 如何用crystalreport,限定每一次列印的资料笔数?<br>: : : 例如:200笔的资料,为了确保列印标签时的误差超出可忍受范围,<br>: : : 故欲限定每次只能印50笔,让使用者稍作调整后,在"接着"从51笔<br>: : : 印到100笔......可行吗?<p>: : : 若不行,可有其余的替代方法?<p>: : : 请各位不吝赐教....谢谢~~~~~~~~~!!!!<p>: : 你可以只每次将50笔资料存入另外一 table ,再将此 table 由 crystal report 列印出去,不管是否有无列印,只要再按一次,就将此 table 资料删除,再继续将 51 ~ 100 之资料存入此table,再列印出来...以此类推<p>: 如何在用table....??????????x<p>我没有试过,不过应该可行:<p>rst=将所要列印之资料 select 进来<p>sub Run_Print()<br>   dim Num as integer<br>   dim I as integer<br>   num=50 ----可随机设定要一次列印几笔资料<br>   delete ---  执行删除 table 假设名称为 aa<br>   for i=1 to num<br>      if rst.eof then exit for<br>      insert --- 将目前 rst 所在之record 写入 aa<br>   next<br>   crystalrpt.action=1   ----列印来源为 aa<br>end sub<br>只要每次执行这个副程式(或是将之写在一个 button 中)应该就可以达到每次只列印50笔<br>,一直到结束<br>以上只是粗略构想,一些错误判断和其他细节请自行考虑.<br>   <p><p><p>
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 9664-->
<!--top: 9732--><li><a href="9732.html">Re: Crystal  的 Detail 的控制项控制</a> <b>阿得</b> <i>12:37:48 2/01/99</i>
(<!--responses: 9732-->0)
<ul><!--insert: 9732-->
</ul><!--end: 9732-->
</ul><!--end: 9664-->
<br><hr size=7 width=75%><p>

</body></html>

9664.html - 源码说明

本页面展示了「VB技巧问答10000例,是一个教程」中的 9664.html 源码文件，采用 HTML 编程语言编写，共 27 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与10000相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?