很怪!试试下面两个<br><br>FORM_INFO_1<br><br>类型定义 <br>Type FORM_INFO_1<br>Flags As Long<br>pName As Long<br>Size As SIZEL<br>ImageableArea As RECT<br>End Type <br>说明 <br>Contains information about a print form. <br>字段表 <br>字段 类型及说明 <br>Flags Long,如表单内建到打印机,则为常数FORM_BUILTIN <br>pName Long,表单的名字 <br>Size SIZEL,以千分之一毫米为单位的打印媒介尺寸 <br>ImageableArea RECT,可以绘图的实际区域,以千分之一毫米为单位 <br><br>///////////////<br>AddForm <br><br>VB声明 <br>Declare Function AddForm& Lib "spoolss.dll" Alias "AddFormA" (ByVal hPrinter As Long, ByVal Level As Long, pForm As FORM_INFO_1) <br>说明 <br>为打印机的表单列表添加一个新表单。“表单”描述了一个页面大小及布局,提供了一种与设备无关的机制,可实现Windows NT下的纸张尺寸的标准化 <br>返回值 <br>Long,非零表示成功,零表示失败。会设置GetLastError <br>参数表 <br>参数 类型及说明 <br>hPrinter Long,一个已打开的打印机对象的句柄(用OpenPrinter获得) <br>Level Long,设为1 <br>pForm FORM_INFO_1,对表单进行描述的一个结构 <br>适用平台 <br>Windows NT<br> <br>其他 <br>在VB的API文本查看器里复制的声明如下:<br>Declare Function AddForm Lib "winspool.drv" Alias "AddFormA" (ByVal hPrinter As Long, ByVal Level As Long, pForm As Byte) As Long <br><br><br> <br><br>