Word and Text File Open in WPF using VB.NET

In this article, We will learn how to open word and text file in WPF.
  • 3108

In this article, We will learn how to open word and text file in WPF.
We will create .xaml page. we will add a textbox and Button control to XAML page. We will use class OpenFileDialog for browse files on a machine. We will use namespace 'Microsoft.Win32.OpenFileDialog' for upload file.
Example:- This code is .xaml

<Window x:Class="Window1"
    xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
    Title="Window1" Height="300" Width="400">
    <Grid>
        <TextBox Name="FileNameTextBox" Height="32" HorizontalAlignment="Left"
Margin="10,10,0,0"
                 VerticalAlignment="Top" Width="250" Background="AliceBlue" />
        <Button Content="Browse" Height="32" HorizontalAlignment="Left"
Margin="275,10,0,0"
                Name="BrowseButton" VerticalAlignment="Top" Width="88" />
    </Grid>
</
Window>
This code is .xaml.vb:-We will upload text file in this example.

Class Window1
    Private Sub BrowseButton_Click(ByVal sender As System.Object, ByVal e As
System.Windows.RoutedEventArgs) Handles BrowseButton.Click
        Dim openFileDialog As Microsoft.Win32.OpenFileDialog = New
Microsoft.Win32.OpenFileDialog()
        openFileDialog.DefaultExt = ".txt"       
        openFileDialog.Filter = "Text documents (.txt)|*.txt"       
        If (openFileDialog.ShowDialog() = True) Then
            Dim fileName As String = openFileDialog.FileName
            If (openFileDialog.FileName.Length > 0) Then
                FileNameTextBox.Text = openFileDialog.FileName
            End If
        End If
    End Sub
End Class

We will upload word file in this example.

Class Window1
    Private Sub BrowseButton_Click(ByVal sender As System.Object, ByVal e As
System.Windows.RoutedEventArgs) Handles BrowseButton.Click
        Dim openFileDialog As Microsoft.Win32.OpenFileDialog = New
Microsoft.Win32.OpenFileDialog()       
        openFileDialog.DefaultExt = ".doc"       
        openFileDialog.Filter = "Word documents (.doc)|*.doc"
        If (openFileDialog.ShowDialog() = True) Then
            Dim fileName As String = openFileDialog.FileName
            If (openFileDialog.FileName.Length > 0) Then
                FileNameTextBox.Text = openFileDialog.FileName
            End If
        End If
    End Sub
End Class

Output:-

upload1.bmp

Categories

More Articles

© 2020 DotNetHeaven. All rights reserved.