Hi Linda,
use the code below to have a try:
Dim document As New Document()
Dim section As Section = document.AddSection()
Dim p2 As Paragraph = section.AddParagraph()
p2.AppendText("fdsdfsdsffdsdsfsdgfda")
p2.Format.BackColor = Color.Blue
document.SaveToFile("Sample.doc")
System.Diagnostics.Process.Start("Sample.doc")