How do i go about reading a bitmap from a file and sending it via a StreamWriter to a printer?

so far i 've been using this code:

VB Code:
  1. Dim i As Integer
  2.         Dim bBitmap As New Bitmap(p_bmLoc)
  3.         Dim bByte((bBitmap.Width * bBitmap.Height * 3) - 1) As Byte
  4.         For y As Integer = 0 To bBitmap.Height - 1
  5.             For x As Integer = 0 To bBitmap.Width - 1
  6.                 Dim oColour As Color = bBitmap.GetPixel(x, y)            
  7.                 bByte(i) = oColour.R
  8.                 bByte(i + 1) = oColour.G
  9.                 bByte(i + 2) = oColour.B
  10.                 i += 3
  11.             Next
  12.         Next