Imports System
Imports System.Text
Public Class ConvertStringToHex_VB_NET
Public Shared Sub Main(ByVal args As String())
Dim str As String = "vb.net programming"
Dim hexString As StringBuilder = New StringBuilder()
For Each ch As Char In str
hexString.AppendFormat("{0:X2}", Convert.ToInt32(ch))
Next
Console.WriteLine(hexString.ToString())
End Sub
End Class
' run:
'
' 76622E6E65742070726F6772616D6D696E67
'