AppStd/Modules
8
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Merge branch 'master' of http://git.dd:3000/AppStd/Modules

Browse Source
This commit is contained in:
Developer01 2025-03-14 14:43:19 +01:00
commit 6fb82c20ee
2 changed files with 10 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
Interfaces/My Project/AssemblyInfo.vb
View File

@ -13,7 +13,7 @@ Imports System.Runtime.InteropServices
<Assembly: AssemblyCompany("Digital Data")> <Assembly: AssemblyCompany("Digital Data")>
<Assembly: AssemblyProduct("Modules.Interfaces")> <Assembly: AssemblyProduct("Modules.Interfaces")>
<Assembly: AssemblyCopyright("Copyright © 2025")> <Assembly: AssemblyCopyright("Copyright © 2025")>
<Assembly: AssemblyTrademark("2.2.3.0")> <Assembly: AssemblyTrademark("2.2.5.0")>
<Assembly: ComVisible(False)> <Assembly: ComVisible(False)>
@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben: ' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")> ' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("2.2.3.0")> <Assembly: AssemblyVersion("2.2.5.0")>
<Assembly: AssemblyFileVersion("2.2.3.0")> <Assembly: AssemblyFileVersion("2.2.5.0")>

6
Interfaces/ZUGFeRDInterface/PropertyValues.vb
View File

@ -342,9 +342,15 @@ Public Class PropertyValues
End Select End Select
Return DoGetFinalPropValue(Value) Return DoGetFinalPropValue(Value)
Else
' Nothing kann auch der Default-Wert der Variablen bedeuten. Also auch 0.00
If IsNothing(Value) Then
Return String.Empty
Else Else
Return Value.ToString Return Value.ToString
End If End If
End If
End Function End Function
Private Function GetIndex(Prop As String) As Integer Private Function GetIndex(Prop As String) As Integer