Initial

EDOKA/Backup1/Utils/AvaloqDokumentWert.vb

@@ -0,0 +1,27 @@
+Public Class AvaloqDokumentWert
+    Private strName As String
+    Private strValue As String
+
+    Public Sub New(ByVal name As String, ByVal value As String)
+        Me.name = name
+        Me.value = value
+
+    End Sub
+
+    Public Property name() As String
+        Get
+            Return strName
+        End Get
+        Set(ByVal Value As String)
+            strName = Value
+        End Set
+    End Property
+    Public Property value() As String
+        Get
+            Return strValue
+        End Get
+        Set(ByVal Value As String)
+            strValue = Value
+        End Set
+    End Property
+End Class