Public Class Pasta
Public Structure info
Public producto As String
Public cantidad As Integer
End Structure
Public Enum otrosEdulcorantes
miel = 1
aspartame = 2
End Enum
Public Enum ingredientesSecretos
canela = 1
anis = 1
piña = 2
End Enum
Public Enum otrosIngredientes
limon = 1
naranja = 2
calabaza = 3
ajo = 4
tomate = 5
cocacola = 6
chococalte = 7
coco = 8
nataMontada = 9
caramelo = 10
End Enum
Public Enum ingredientesBase
agua = 1
aceite = 2
sal = 3
azúcar = 4
harina = 5
alcohol = 6
End Enum
Public Enum formas
irregular = 0
redonda = 1
oval = 2
triangular = 3
rectangular = 4
estrellada= 5
End Enum
Public Structure ingredientes
Public base() As info
Public edulcorantes() As info
Public secretos() As info
Public otros() As info
End Structure
Public Structure dimensiones
Public largo As Short 'en milímetro
Public ancho As Short 'en milimetro
Public grueso As Short 'en milimetros
Public superficie As Short 'en cm cuadrados
End Structure
Public Structure empaquetado
Public tamañoCaja As dimensiones
Public cantidad As Short
Public precio As Short
Public peso As Short
End Structure
Public numIngredientes As Short
Public partesTotales As Integer
Public forma As formas
Public tamaño As dimensiones
'genera una pasta básica
Public Sub New()
End Sub
End Class