编译错误！！！

jonny

当我运行[打印设置]窗体时出现错误提示！如下：
“用户定义类型未定义”
Dim [B]prt As Printer[/B]' 为选定的打印机选取打印机对象。



[预览命令]全部代码如下：

Private Sub cmdPreview_Click()
' 包含要操纵的打印机对象的变量。
Dim prt As Printer
' 为选定的打印机选取打印机对象。
Set prt = Application.Printers(Me!cmbPrinter.Value)
' 读取用户指定的设置。
prt.PaperSize = Me!cmbPaperSize
prt.Orientation = Me!opgOrientation
' 以预览模式打开报表。
DoCmd.OpenReport Me!lbxSelectReport, acViewPreview
' 将报表的打印机设置为已修改的打印机对象。
Reports(Me!lbxSelectReport).Printer = prt
End Sub

[此贴子已经被作者于2002-10-31 14:14:28编辑过]