C# Definition:

[ComImport]
[Guid("3A6AD9E1-23B9-11cf-AD60-00AA00A74CCD")]
[InterfaceTypeAttribute(ComInterfaceType.InterfaceIsIUnknown)]
interface ITransactionDispenser
{
    [return:MarshalAs(UnmanagedType.IUnknown)]
    object GetOptionsObject();

    [return:MarshalAs(UnmanagedType.Interface)]
    ITransaction BeginTransaction(
      [MarshalAs(UnmanagedType.IUnknown)] object pUnknownOuter,
      IsolationLevel isoLevel, IsoFlag isoFlag,
      [MarshalAs(UnmanagedType.IUnknown)] object transactionOptions);
}

VB Definition:

<ComImport(), Guid("3A6AD9E1-23B9-11cf-AD60-00AA00A74CCD"), _
InterfaceType(ComInterfaceType.InterfaceIsIUnknown)> _
Interface ITransactionDispenser
    Function GetOptionsObject() As Object
    Function BeginTransaction(ByVal pUnknownOuter As Object, _
    ByVal isoLevel As IsolationLevel, ByVal isoFlag As IsoFlag, _
   ByVal transactionOptions As Object) As ITransaction
End Interface

User-Defined Types:

IsolationLevel, IsoFlag

Notes:

None.