AJUDA CONVERSAO

ALEVALE 20/06/2012 10:02:10
#404534

Pessoal bom dia,

Alguém poderia dar uma ajuda para converter esse arquivo C# para VB.NET

http://geekswithblogs.net/bullpit/archive/2009/10/30/automated-password-expiration-notice-for-remote-active-directory-users.aspx

Já realizei a conversão mas estou com problemas na função abaixo:
Como eu faço o return desses dados.

Public Shared Function GetCountdown() As String
[ô]Return SettingsProvider.[Get]([Ô]Countdown[Ô], [Ô]15[Ô])
End Function

Dim dateAcctPwdChange As Long = ((CLng(liAcctPwdChange.HighPart) << 32) + CLng(liAcctPwdChange.LowPart))
Como eu pego o HighPart e o LowPart