[VB6]Bot Sourcecode übersetzen

[Kraizy​]

Hallo, ich hab auf meinem PC noch ein altes Silkroad Bot Projekt das in VB6 erstellt wurde und wollte diese nun in VB.NET oder C# nachmachen, aber ich hab Probleme beim Übersetzen dieser beiden Funktionen:

Public Function HexToString(sMessage As String) As String
Dim i As Integer
    For i = 1 To Len(sMessage) Step 2
        HexToString = HexToString & Chr(Int("&h" & Mid(sMessage, i, 2)))
    Next
End Function

Private Function longToHex(l As Long) As String
    longToHex = Hex(l)
    If Len(longToHex) < 4 Then longToHex = String(4 - Len(longToHex), "0") & longToHex
    longToHex = Right(longToHex, 2) & Left(longToHex, 2)
End Function

Würde mich sehr freuen, wenn mir jemand dabei helfen könnte!

[Kraizy​]

Keiner eine Idee wie man das machen könnte?