下面是个DDE的例子,你可能是没有设置LinkExecute
Private Sub Form_LinkExecute(CmdStr As String, Cancel As Integer)
 Print CmdStr
 Cancel = False '如果为TRUE 则客户端要出错
End SubPrivate Sub Form_Load()
        ' 否则在连接DDE程序时会出乱子的
If App.PrevInstance Then
Me.LinkTopic = ""          ' 这两行用于清除新运行的程序的DDE服务器属性,
Me.LinkMode = 0
Picture1.LinkMode = 0              '--
Picture1.LinkTopic = "DDE|Form1"  '  |______连接DDE程序并发送数据/参数
Picture1.LinkMode = 2              '  |      “|”为管道符,是“退格键”旁边的竖线,
Picture1.LinkExecute "asd"  End                              '  结束新程序的运行
End If
End Sub

解决方案 »

  1.   

    对不起,发错了,http://www.csdn.net/expert/topic/791/791547.xml?temp=.3827783应当是这个贴子的
    你的问题可以更改打印机纸张的大小来解决
    方法是使用Printer对象的PaperSize 属性
    详细内容请参见MSDN
      

  2.   

    是与数据环境一起使用的数据报表吗?
    还是自绘到Printer上?