System.Runtime.InteropServices.COMException私は言葉でこの相互運用のコードを実行すると

Question

私はそれは、複数のSystem.Runtime.InteropServices.COMExceptionの

Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click 
    If Origcv = "" Then 
     Label10.Text = "Select a CV" 
    Else 
     ' Create application instance. 
     Dim app As Application = New Application 

     ' Open specified file. 
     Dim doc As Document = app.Documents.Open(Origcv) 

     ' Loop through all words. 
     Dim count As Integer = doc.Words.Count 
     Dim cvw(count) As String 
     For i As Integer = 1 To count 
      ' Write word to screen. 
      Dim text As String = doc.Words(i).Text 

      cvw(i) = doc.Words(i).Text 
     Next 
     ' Quit the application. 
     app.Quit() 

で終わるWord文書をテキストを脱いで、このコードを実行すると、

.countが成功しても、エラーはすべてdoc.words（I）.textに記録されます。私はwordと.netのすべてのコンポーネントをインストールしていますが、これを動作させることはできません。私はそれが工場出荷時にリセットされる前に私はラップトップで前に同じコードを使用して正常に動作していたので、私はいくつかの種類のコンポーネントや設定がないと仮定し、interop.word参照が認識され、タブ。ここで助けが必要なのは、これをすばやく完了させる必要があり、これは文字通りの最初のハードルです。

すべてのヘルプは、私はあなたの問題は、構造物のこの種のは常に危険ですDim app As Application = New Applicationであると考えてい

Answer 1

を高く評価しました。多くの名前空間にはApplicationが使用されています。つまり、.NETにどのアプリケーションが意味されているかを示す修飾子はありません。 Namespace .NETが参照しているのはDocumentsクラスもあるため、Documents.Openが機能することもあります。

あなたは完全にそれを修飾する場合：

Dim app As Microsoft.Office.Interop.Word.Application = New Microsoft.Office.Interop.Word.Application() 

私は問題が離れて行くと信じています。その後

Imports Word = Microsoft.Office.Interop.Word 

：

それがない場合は、Wordの名前空間内のオブジェクトを修飾するためにエイリアスを使用して名前空間にエイリアスを割り当て、モジュールの先頭にImportsを置くには、（物事短くします）

Dim app as Word.Application = New Word.Application() 
Dim doc as Word.Document = app.Documents.Open(Origcv)