540.html

来自「VB技巧问答10000例 VB技巧问答10000例」· HTML 代码 · 共 25 行

HTML
25
字号
<html>  <head>    <title>印表机的问题</title>  </head>  <BODY BACKGROUND="" BGCOLOR="white" TEXT="black" LINK="red" VLINK="#808080" ALINK="">    <center>      <h1>印表机的问题</h1>    </center><HR><p>Posted by <a href="mailto:m85408@ew001.ew.tku.edu.tw">陈守宪</a> on September 04, 1997 at 16:01:40:<p>印表机的问题<br>   除了Form1.PrintForm外(印出许多不必要的区域,而且随萤幕解析度不同<br>   ,列印格式亦随之改变 ),我用Printer.Print, Printer.fontsize<br>   Printer.EndDoc属性、方法,企图将资料以类似DBGrid的格式印出,<br>   ex:   <br>        Data1.Recordset.MoveFirst<br>        (将Text link到Table得某个栏位)     <br>        For i = 1 To Data1.Recordset.RecordCount<br>             name = Text1.Text<br>             id = Text2.Text<br>             add = Text3.Text<br>             phone = Text4.Text<br>             .<br>             .  <br>             printer.fontsize=9<br>             printer.print name,id,add,phone....  ( 配合Spc(n) )<br>             Data1.Recordset.MoveNext<br>        Next i<br>        printer.enddoc<br>    再用commomdialog 将printer设为横向列印<br>    结果,可能由于印表机无法接受printer.fontsize=9 的要求<br>    造成字形太大,许多栏位未印出。使我非常困扰。<br>    这似乎与印表机本身的设定有关?<br>    <br>    请问您要用何种方式,将资料列印成所需的格式?<br>    类似word97,7.0 可在固定表格内填入资料,制作报表。<br><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 540--><!--top: 544--><li><a href="544.html"><b>Re: 印表机的问题</b></a> 小吴 <i>09:23:48 9/06/97</i>(<!--responses: 544-->0)<ul><!--insert: 544--></ul><!--end: 544--></ul><!--end: 540--><br><HR><p></body></html>

⌨️ 快捷键说明

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