Você pode usar funções de codificação de System.Text namespace:

• 
  para salvar no campo blob:
  
  Dim blob_bytes_to_db As Byte() = System.Text.Encoding.ASCII.GetBytes(RichTextBox1.Rtf)
  
• 
  para carregar blob em richtextbox:
  
  RichTextBox1.Rtf = System.Text.Encoding.ASCII.GetChars(blob_bytes_from_db)
  

Observação :Com RichTextBox1 .Text propriedade pode obter/definir apenas texto limpo. Se você deseja obter/definir texto formatado com todos os códigos RTF, use .Rtf propriedade.