2666.html

来自「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题」· HTML 代码 · 共 25 行

HTML
25
字号
<html>
  <head>
    <title>使用RichTextBox控制项的SelPrint法的[头大]问题!!</title>
  </head>
  <BODY BACKGROUND="" BGCOLOR="white" TEXT="black" LINK="red" VLINK="#808080" ALINK="">
    <center>
      <h1>使用RichTextBox控制项的SelPrint法的[头大]问题!!</h1>
    </center>

<HR><p>
Posted by <a href="mailto:chyeu@email.gcn.net.tw">陈春雨</a> on April 24, 1998 at 08:18:18:<p>
各位网友好:<br>我使用Richtextbox控制项中的selprint方法来列印控制项的内文时,有如下问题:<br>1.每当我使用CommonDialog.showprinter来设定印表机参数时,其内定的[纸张大小]及[纸张来源]始终都会回复成[纸张大小=定制(或自订)],[纸张来源=手动送纸],当我将其改成[A4]及[进纸匣]成功印出后,结束程式再进入又回复成原来的值了.<p>2.当我勉强用上述方式印出后,却发现-->当连续印出二张以上时,会在换页时漏掉几个字(刚好在上一页的最后一个字与下一页的第一个字之间).<p>3.同2-->当印出的资料超过二页(或满页)时,会在第一页(或该页)出现一行只印半行的文字(即文字的上半身(或下半身)被砍掉).<p>4.是不是RichTextBox控制项本身的bug或限制!!(我印的都是中文文字)<p>程式节录如下:<br>PS: chap_doc=RichTextBox 控制项<p>chap_doc.SelStart = 0<br>chap_doc.SelLength = 0<br>CommonDialog1.CancelError = True<br>On Error GoTo errhelp<br>      <br>CommonDialog1.Flags = cdlPDReturnDC + cdlPDNoPageNums+_ cdlPDPrintSetup +  cdlPDAllPages<br>CommonDialog1.ShowPrinter<br>chap_doc.SelPrint CommonDialog1.hDC<br>Printer.EndDoc<br>---end---
<br>
<p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 2666-->
<!--top: 2699--><li><a href="2699.html"><b>Re: 使用RichTextBox控制项的SelPrint法的[头大]问题!!</b></a> 小吴 <i>18:22:24 4/28/98</i>
(<!--responses: 2699-->0)
<ul><!--insert: 2699-->
</ul><!--end: 2699-->
</ul><!--end: 2666-->
<br><HR><p>

</body></html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?