container.RegisterType(Of ICream, ChocolateCream)(“ChocoCrem”) ‘ 名前を付けて登録する ‘ 作り方を登録する container.RegisterType(Of ShouCream)(“Choco”, New InjectionConstructor(container.Resolve(container.Resolve(Of ICream)(“ChocoCream”)))) Dim shouCream = container.Resolve(Of ShouCream)(“Choco”) End Sub #End Region