How to load MS Word Document files into a Richtextbox.

-
1. Start by saving the MS Word document as a richtext file.
2. Add the code below to a button.
 3. Add a richtextbox to your project.
You are good to go.

 Private Sub btnBrowseRTF_Click(sender As Object, e As EventArgs) Handles btnBrowseRTF.Click

Dim saveDirectory As String = Application.StartupPath & "\ProcessedRTFS" Using openFileDialog1 As OpenFileDialog = New OpenFileDialog()
 openFileDialog1.Filter = "Richtext Files (*.rtf ) |*.rtf|All Files(*.*) |*.*"
      If openFileDialog1.ShowDialog() = DialogResult.OK Then
          If Not Directory.Exists(saveDirectory) Then
 Directory.CreateDirectory(saveDirectory)

End If

 Dim fileName As String = Path.GetFileName(openFileDialog1.FileName)
 Dim fileSavePath As String = Path.Combine(saveDirectory, fileName) File.Copy(openFileDialog1.FileName, fileSavePath, True)
 'txtImgName.Text = fileName
 txtPathRTF.Text = fileSavePath
 End If
 End Using

 RichTextBox1.LoadFile(txtPathRTF.Text, RichTextBoxStreamType.RichText)

 End Sub

Comments

Post a Comment

Popular posts from this blog

CREATING CRYSTAL REPORTS VB.NET 2012 STEP BY STEP - PART 2

-
Image
Creating A New Report In our part one tutorial ,  we saw how to prepare create a new VB.NET project which we will use in creating and displaying our crystal reports. In this part, we will see how to create the Crystal Report inside VB.NET.  1. Under your project name, right-click and select Add then click New Item. Under Reporting, select Crystal Reports. (Remember we started by installing Crystal Reports for VS 2012 . If you missed this step, please refer to this tutorial here )  2. Give your Report a name and click Add. The diagram below shows the four steps to follow in naming the report and adding it. Once you click Add, you will be taken to Crystal Reports Gallery. 3. In the Crystal Reports Gallery select one of the three options; in our case, we will pick option 2 which is As a Blank Report. So select As a Blank Report. Then under Choose an Expert, select Standard. Finally, click OK button.  4. Back now to your workspace. With...
Read more

How to paste image into picturebox from clipboard with VB.Net

-
Image
How to paste image into picturebox from clipboard with VB.Net If you wish to paste an image into a picturebox from clipboard for your VB.Net project, this is what to do: 1. Add a picturebox to your form. 2. Add a button and copy paste the code below.         Private Sub btnPastePic_Click(sender As Object, e As EventArgs) Handles btnPastePic.Click               'If My.Computer.Clipboard.ContainsImage Then         '    PictureBox1.Image = My.Computer.Clipboard.GetImage         'End If         Dim idata As IDataObject = Clipboard.GetDataObject()         If idata.GetDataPresent("System.Drawing.Bitmap") Then             Dim imgObject As Object = idata.GetData("System.Drawing...
Read more

KENYA'S NEW CURRENCY

-
Image
December 11 2018, the Central Bank of Kenya (CBK) unveiled Kenya’s new generation coins. These coins start circulating immediately.   The new currency, was gazetted on Tuesday December 11, 2018. One remarkable thing in this Kenya's new currency is that it contains features that make it accessible to visually impaired people. The unveiling of the new generation coins was presided over by President Uhuru Kenyatta in the capital Nairobi. These coins will be available in denominations of Sh1, Sh5, Sh10 and Sh20. This was also a memorable moment since President Kenyatta, was making his first visit to CBK since taking office in 2013 and to crown it all he received a symbolic cheque of dividends on behalf of the government.  Features on New Currency These coins unlike the old ones which had portraits of former presidents Jomo Kenyatta and Daniel arap Moi have features Kenya's rich wildlife heritage, as follows: Sh20: Bears the image of an elephant...
Read more