Puede usar funciones codificadas desde System.Text espacio de nombres:
-
para guardar en el campo blob:
Dim blob_bytes_to_db As Byte() = System.Text.Encoding.ASCII.GetBytes(RichTextBox1.Rtf) -
para cargar blob en cuadro de texto enriquecido:
RichTextBox1.Rtf = System.Text.Encoding.ASCII.GetChars(blob_bytes_from_db)
Nota :Con RichTextBox1 .Text La propiedad solo puede obtener/establecer texto limpio. Si desea obtener/establecer texto formateado con todos los códigos RTF, use .Rtf propiedad.