Como grabar texto con formato desde un RichTextBox hacia SQL Server con VB.net 2008

[byroncholca]

'''''''''''
'''' esta funcion es la que recupera de la base de datos pero sale un error
''''''''
Dim id As Integer = 10
logica.archivo = ubicacion.Text
Try
ds = logica.traertodosds("sp_devuelve_cuadro")
Dim Buffer() As Byte


For Each fila2 As DataRow In ds.Tables(0).Select("id_cuadro= '" & id & "'")
Buffer = fila2("grafico")
'Declaramos la variable Byte y le metemos el array que tenemos guardado.
'Definimos el memoryStream en el que meter nuestros Bytes

MemContent.Read(Buffer, 0, Buffer.Length)
'Leemos el memoryStream en el RichTextBox como si fuese un archivo.
' aqui tengo un error me dice que el tipo de datos no es valido
RichTextBox1.LoadFile(MemContent, RichTextBoxStreamType.RichText)
Next
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try