ツリーを構築してすべてのブランチを抽出する

Question

次の問題をどのように細分化する必要がありますか？

私はレストランを所有し、今夜のメニューをデザインしたいとします。簡単な例として、私は食材の3種類持って

： 野菜（トマト、ジャガイモ、レタス） 炭水化物（ご飯、パスタ、パン） 肉（豚肉、鶏肉、牛肉）

編集：中実際には、未知の量の成分と成分の種類があります。 私は利用可能なすべての料理のリストを作りたいと思います。上記の例を使用して、各皿は、3つのタイプの成分全てを有するべきである。トマト - ライス - ポーク、トマト - パスタ - チキン、ジャガイモ - パン - ビーフ。

私のアプローチは、これをツリーとして扱い、DFSを行うことです。ツリーが横断されるときにブランチオブジェクトを作成し、各ノードをツリーの底に達するまで各ノードをブランチオブジェクトに追加し、すべてのノードが通過するまで新しいブランチを作成します。これは、組み合わせの一覧が表示されます

       Meals 
        /   |     \ 
       Tomatoes   Potatoes   Lettuce 
      / | \  / | \   / | \ 
     Rice Pasta Bread Rice Pasta Bread Rice Pasta Bread 
    / | \ 
    Beef Pork Chicken 

Answer 1

：：私はXMLライブラリを使用しても理想的

tomatoes-rice-pork 
tomatoes-rice-chicken 
tomatoes-rice-beef 
tomatoes-pasta-pork 
tomatoes-pasta-chicken 
tomatoes-pasta-beef 
tomatoes-bread-pork 
tomatoes-bread-chicken 
tomatoes-bread-beef 
potatoes-rice-pork 
potatoes-rice-chicken 
potatoes-rice-beef 
potatoes-pasta-pork 
potatoes-pasta-chicken 
potatoes-pasta-beef 
potatoes-bread-pork 
potatoes-bread-chicken 
potatoes-bread-beef 
lettuce-rice-pork 
lettuce-rice-chicken 
lettuce-rice-beef 
lettuce-pasta-pork 
lettuce-pasta-chicken 
lettuce-pasta-beef 
lettuce-bread-pork 
lettuce-bread-chicken 
lettuce-bread-beef 

：これはあなたのような出力が得られます

Const vegetables$ = "tomatoes,potatoes,lettuce" 
Const carbs$ = "rice,pasta,bread" 
Const meats$ = "pork,chicken,beef" 

Dim v, c, m, i As Long 

For Each v In Split(vegetables, ",") 
    For Each c In Split(carbs, ",") 
     For Each m In Split(meats, ",") 
      Debug.Print v & "-" & c & "-" & m 
     Next 
    Next 
Next 

ので、以下のようになりますこれをXMLオブジェクトとして構築するには、ファイルなどに簡単に書き込むことができます。