如何用API在打印机上绘制五角星，然后打印？谢谢

如题！

解决方案 »

  1.   

    Printer.Print "★"
    Printer.EndDoc
      

  2.   

    可以在Picture控件内绘制五角星然后用Printer打印
    Private Sub Command1_Click()
        Printer.PaintPicture Picture1.Picture, 0, 0
        Printer.EndDoc
    End Sub
      

  3.   

    //不好意思，忘说了，五角星在预览（画在屏幕上，大小可变）时画出来了，可在打印机上怎么画，我就没招了（注意，不是画字符）。將星星畫在窗體上，然後　Me.PrintForm
      

  4.   

    leolan(史留香) ( )：谢谢，我说的是定点打五角星，只打五角星，Me.PrintForm会将窗体上的其余的东西都打印出来的，不行
      

  5.   

    既然预览出来了，那就将预览的载体改成Printer比如说你预览在PictureBox上，就将Picture1改成Printer最后再加上一句Printer.EndDoc
      

  6.   

    好像不行，就算能通过PictureBox或Me.PrintForm打印出来，可能也赶不上通过Printer画上去的效果
      

  7.   

    kinlin(小林):你都有五个星了，呵呵