如何浏览/定位MS Word并使用vb.net显示它

Question

我尝试按照LINK进行操作，但本教程正在直接查看已有数据的MS Word。

我也尝试下面的代码

  Dim objWord As Word.Application
    Dim objDoc As Word.Document
    objWord = CreateObject("Word.Application")
    objDoc = objWord.Documents.Open("G:\Folder\NewFolder\HHHHH.docx")
    objWord.Visible = True

但是这段代码是固定的，如果MS在那条路径中单词并查看它。

我想要实现的只是在PC上的任何位置浏览MS Word并在表单中显示它。如果可能的话，单击一个按钮并在水晶报告中预览它。所以我可以打印出来。

Answer 1

您可以使用OpenFileDialog：

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click


    Dim filedialog As New OpenFileDialog

    filedialog.InitialDirectory = "C:\"
    filedialog.Filter = "Word Files|*.docx"
    filedialog.ShowDialog()

End Sub

对我来说很好。