如何填充 System.Environment？

Question

我正在尝试填充 System.Environment：

Dim args = {"a", "b", "c", "d", "e")}
System.Fakes.ShimEnvironment.GetCommandLineArgsGet =
Function() As String()
   Return args
End Function

我引用了 C:\Program Files (x86)\Microsoft Visual Studio\2019\Preview\Common7\IDE\PublicAssemblies\Microsoft.QualityTools.Testing.Fakes.dll

我的项目的 Fakes 文件夹中有以下文件：

mscorlib.fakes：

<Fakes xmlns="http://schemas.microsoft.com/fakes/2011/">
  <Assembly Name="mscorlib" Version="4.0.0.0"/>
</Fakes>

System.fakes：

<Fakes xmlns="http://schemas.microsoft.com/fakes/2011/">
  <Assembly Name="System" Version="4.0.0.0"/>
</Fakes>

但是我得到了编译错误：

错误 BC30456：“ShimEnvironment”不是“System.Fakes”的成员。

如何填充 System.Environment？

Answer 1

按照https://social.msdn.microsoft.com/Forums/vstudio/en-US/b49e9f5d-0e57-46b1-8ced-f3231db5e813/cannot-find-a-shim-for-systemenvironmentmachinename-etc?forum=vsunittest 中的建议，我必须将以下内容放入 mscorlib.fakes：

  <ShimGeneration>
    <Add FullName="System.Environment"/>
  </ShimGeneration>