POS打印机打印图片的问题

Private Sub Command1_Click()
Dim str1, str2 As String
Open "Lpt1" For Output As #1 '打印机名字
'打印数据
str1 = "欢迎使用票据打印机!" & Chr(10)
str2 = Chr(29) & Chr(86) & "0"
Print #1, str1
Print #1, str2
Close #1
End Sub
pos打印机打印文字时可以用这个打印.请问打印图片时应该怎么写???请大家支招...