Patterns: WIP Patterns version 2

Modules.Patterns/Pattern.vb

@@ -0,0 +1,13 @@
+Public Class Pattern
+    Public ReadOnly Property Type As String
+    Public ReadOnly Property Value As String
+
+    Public Sub New(pType As String, pValue As String)
+        Me.Type = pType
+        Me.Value = pValue
+    End Sub
+
+    Public Overrides Function ToString() As String
+        Return $"{{#{Type}#{Value}}}"
+    End Function
+End Class