RichTextBox & word

السلام عليكم

بالنسبة للسؤال الأول إستخدمي العنصر Stream بهذا الشكل

 Try
            Dim m As New StreamReader(File.OpenRead(Application.StartupPath & "\myFile.doc"))
            Do Until m.Peek = -1
                txtReader.Text &= m.ReadLine() & vbCrLf
            Loop

        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try

السؤال الثاني فقط ضعِ خاصية الـ Visible للـ RichTextBox تساوي false وعند الضغط على الزر إجعليها تساوي True

بلا شك أن هنالك طرق أفضل بالنسبة للسؤال الأول أبحثي عنها في MSDN

والله أعلم