Visual Studio Testとフォームアプリケーション

Question

これはVisual Studio 2017 V15.5.2であり、提案された修正は適用されません。

"Dim comp"行の例外を除いて実行できない単純なテストがあります。

System.BadImageFormatException：「ファイルまたはアセンブリをロードできませんでした 'System.IO.FileSystem、バージョン= 4.0.1.0、文化=中立、なPublicKeyToken = b03f5f7f11d50a3a' またはその依存関係の1つ。参照アセンブリは、実行のために読み込まれるべきではありません。それらは、Reflection-onlyローダーコンテキストでのみロードできます。 （HRESULTからの例外：0x80131058） '

以下のテストコードは、Windowsフォームアプリケーションにコピーするとほぼ同じコードが完全に動作します。いくつかのスニからの助けと一つの追加のステップに

Public Class Form1 
    Dim tree As SyntaxTree = VisualBasicSyntaxTree.ParseText("Imports System 
     Imports System.Collections.Generic 
     Imports System.Text 
     Class TestClass 
      Private Sub TestMethod() 
       Dim x = ""Hello, World!"" 
     End Sub 
    End Class") 

    Dim comp As Compilation = VisualBasicCompilation.Create("HelloWorld"). 
      AddReferences(MetadataReference.CreateFromFile(GetType(Object).Assembly.Location), 
          MetadataReference.CreateFromFile(GetType(Form1).Assembly.Location)). 
          AddSyntaxTrees(tree) 

    Dim model As SemanticModel = comp.GetSemanticModel(tree) 
End Class 

Answer 1

以下

Imports Microsoft.CodeAnalysis 
Imports Microsoft.CodeAnalysis.VisualBasic 
Imports Xunit 
Public Class ExpressionTests 
    <Fact> 
    Public Sub SystemConvert() 
     Dim tree As SyntaxTree = VisualBasicSyntaxTree.ParseText(
"Imports System 
Imports System.Collections.Generic 
Imports System.Text 
Class TestClass 
    Private Sub TestMethod() 
     Dim x = ""Hello, World!"" 
    End Sub 
End Class") 

Dim comp As Compilation = VisualBasicCompilation.Create("HelloWorld"). 
      AddReferences(MetadataReference.CreateFromFile(GetType(Object).Assembly.Location), 
          MetadataReference.CreateFromFile(GetType(ExpressionTests).Assembly.Location)). 
          AddSyntaxTrees(tree) 
     Dim model As SemanticModel = comp.GetSemanticModel(tree) 
    End Sub 
End Class 

フォームのコードは、私は解決策を持っています。ステップ1テストプロジェクトのターゲットフレームワークを変更します（4.7.1から4.6.2に変更し、4.7.1に戻しました）。ステップ2！！！ NuGetコマンドウィンドウで、Update-Package -reinstallと入力します。これですべてが完了します。