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 Wordのそれならばとは、それを見ることを修正しています。

私が達成したいのは、自分の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 

が私のために正常に動作します。