This one is really stupid example, but it really works this way, so why not...
Public Shared Function ConvertToHex(text As String) As String
Dim sb As New StringBuilder()
For Each b As Byte In text
sb.Append(b.ToString("x"))
Next
Return sb.ToString()
End Function