Public Function New( _
   ByVal filename As String, _
   ByVal mode As FileMode, _
   ByVal access As FileAccess, _
   ByVal share As FileShare, _
   ByVal bufferSize As Integer, _
   ByVal options As FileOptions _
)

public FileStreamFactory( 
   string filename,
   FileMode mode,
   FileAccess access,
   FileShare share,
   int bufferSize,
   FileOptions options
)

using(TempFile tempFile = new TempFile())
{
    FileStreamFactory factory = new FileStreamFactory(tempFile.TempPath, FileMode.Create, FileAccess.ReadWrite, FileShare.None, 1024, FileOptions.Asynchronous);
    Assert.AreEqual(tempFile.TempPath, factory.FileName);
    using (FileStream s = (FileStream)factory.Create())
        Assert.IsTrue(s.CanRead && s.CanWrite && s.IsAsync);
}

Using tempFile As New TempFile()
    Dim factory As New FileStreamFactory(tempFile.TempPath, FileMode.Create, FileAccess.ReadWrite, FileShare.None, 1024, FileOptions.Asynchronous)
    Assert.AreEqual(tempFile.TempPath, factory.FileName)
    Using s As FileStream = DirectCast(factory.Create(), FileStream)
        Assert.IsTrue(s.CanRead AndAlso s.CanWrite AndAlso s.IsAsync)
    End Using
End Using