devxlogo

ConvertReverseFullName – Convert a reverse name to the “FirstName LastName” format

ConvertReverseFullName – Convert a reverse name to the “FirstName LastName” format

' convert a reversed full name back to the "FirstName LastName" format'' for example, ConvertReverseFullName("Smith, John A.") ==> "John A. Smith"Function ConvertReverseFullName(ByVal ReverseFullName As String) As String    Dim i As Long        ReverseFullName = Trim$(ReverseFullName)    i = InStr(ReverseFullName, ",")    If i = 0 Then        ' no comma, just return the argument        ConvertReverseFullName = ReverseFullName    Else        ' exchange first and last name        ConvertReverseFullName = Mid$(ReverseFullName, _            i + 1) & " " & Left$(ReverseFullName, i - 1)    End If    End Function

See also  Professionalism Starts in Your Inbox: Keys to Presenting Your Best Self in Email
devxblackblue

About Our Editorial Process

At DevX, we’re dedicated to tech entrepreneurship. Our team closely follows industry shifts, new products, AI breakthroughs, technology trends, and funding announcements. Articles undergo thorough editing to ensure accuracy and clarity, reflecting DevX’s style and supporting entrepreneurs in the tech sphere.

See our full editorial policy.

About Our Journalist