Transformar una fecha de tipo LONG

[Javichechu]

LngBias se optiene del siguienet código, pero sigo sin saber ponerlo en práctica en .net

Código:

' Obtain local Time Zone bias from machine registry.

Set objShell = CreateObject("Wscript.Shell")
lngBiasKey = objShell.RegRead("HKLM\System\CurrentControlSet\Control\" _
    & "TimeZoneInformation\ActiveTimeBias")

If (UCase(TypeName(lngBiasKey)) = "LONG") Then
    lngBias = lngBiasKey
ElseIf 
    (UCase(TypeName(lngBiasKey)) = "VARIANT()") Then
        lngBias = 0
         For k = 0 To UBound(lngBiasKey)
            lngBias = lngBias + (lngBiasKey(k) * 256^k)
         Next
End If