Le punch de Noël, une autre façon de boire Visual Basic !

Punch de Noël (pour 16 personnes) avec du code VB inside

Faites dans l'originalité pour Noël et proposez à vos convives une recette d'apéritif très tendance, très "dev", avec ce Punch de Noël spécialement écrit en Visual Basic. Succès assuré !

L'abus d'alcool est dangereux pour la santé, les recettes alcoolisées sont à consommer avec modération.

Module Recette



    Sub Main()



        Dim lesOranges = New Ingrédient(Of Orange, Gramme(Of Integer))(New Orange(), New Gramme(Of Integer)(400)).Couper()

        Dim lesPommes = New Ingrédient(Of Pomme, Gramme(Of Integer))(New Pomme(), New Gramme(Of Integer)(400)).Couper()



        Dim leRhum = New Ingrédient(Of Rhum, Centilitre(Of Integer))(New Rhum(), New Centilitre(Of Integer)(10))

        Dim leMélange As Mélange = leRhum.Macérer(lesOranges, lesPommes)



        Dim laCasserole As New Casserole()



        laCasserole.Add(New Ingrédient(Of JusSureau, Litre(Of Decimal))(New JusSureau(), New Litre(Of Decimal)(1.5)))

        laCasserole.Add(New Ingrédient(Of VinRouge, Litre(Of Integer))(New VinRouge(), New Litre(Of Integer)(2)))

        laCasserole.Add(New Ingrédient(Of Cannelle, Gousse(Of Integer))(New Cannelle(), New Gousse(Of Integer)(1)))

        laCasserole.Add(New Ingrédient(Of Vanille, Bâtonnet(Of Integer))(New Vanille(), New Bâtonnet(Of Integer)(8)))



        laCasserole.Bouillir()



        Dim laCasserole2 As New Casserole()

        laCasserole2.Add(Passoire.Passer(laCasserole.Contenu))

        laCasserole2.Add(New Ingrédient(Of Miel, Gramme(Of Integer))(New Miel(), New Gramme(Of Integer)(160)))

        laCasserole2.Add(leMélange.Egoutter())

        laCasserole2.Add(New Ingrédient(Of VinCuit, Litre(Of Decimal))(New VinCuit(), New Litre(Of Decimal)(0.5)))



        laCasserole2.Chauffer()



        Dim monAssiette As Assiette = laCasserole2.ServirChaud()



        Console.ReadLine()



    End Sub



End Module

Recette extraite du site 750 grammes : www.750g.com

L'abus d'alcool est dangereux pour la santé, les recettes alcoolisées sont à consommer avec modération.

Ressources utiles Visual Basic Débuter en Visual Basic 2008 avec la Coach VB Toutes les vidéos Visual Basic Le site Visual Basic sur MSDN Visual Basic 2008 Express Edition