条码打印问题

我写的程序代码如下：
    With Printer
        .FontName = "宋体"   '如附件中字库
        .FontSize = 12       '文字大小
        .FontBold = 否       '是否加粗
        .CurrentX = 3        '打印位置
        .CurrentY = 3        '垂直位置
    End With

    'Printer.FontName = "CIA Code 39 Medium Text"   '使用系统默认字体格式    Printer.Print S_txt  '"条码内容"    Printer.EndDoc   '启动打印机开始打印执行到Printer.Print 时,不是打印，而是出现另存对话框，这是怎么回事？
请大家指教，谢谢