Currency Wrapper windream

This commit is contained in:
SchreiberM 2023-04-26 15:18:11 +02:00
parent da9dd6dcd7
commit 0c1b070a90
2 changed files with 3 additions and 3 deletions

View File

@ -104,7 +104,7 @@ Public Class Helpers
Case INDEX_TYPE_CURRENCY
'Wegen currency muß ein eigenes Objekt vom typ Variant erzeugt werden
Dim aValueWrapper As System.Runtime.InteropServices.CurrencyWrapper = New System.Runtime.InteropServices.CurrencyWrapper(CDec(pValue))
Return pValue
Return aValueWrapper
Case Else
Return pValue
End Select

View File

@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("1.9.2.0")>
<Assembly: AssemblyFileVersion("1.9.2.0")>
<Assembly: AssemblyVersion("1.9.3.0")>
<Assembly: AssemblyFileVersion("1.9.3.0")>