Right Function

 

Right (stringexpression, n )

 

Returns the right most n characters of the string parameter.

 

The parameter stringexpression   is the string from which the rightmost characters are returned.

 

The parameter n  is the number of characters that will be returned and must be a long integer.

 

Related Topics: Len, Left, Mid Functions.

 

Example:

 

' The example uses the Right function to return the first of two words

' input by the user.

 

Sub Main ()

   Dim LWord, Msg, RWord, SpcPos, UsrInp ' Declare variables.

   Msg = "Enter two words separated by a space."

   UsrInp = InputBox(Msg)  ' Get user input.

   print UsrInp

   SpcPos = InStr(1, UsrInp, " ") ' Find space.

   If SpcPos Then

       LWord = Left(UsrInp, SpcPos - 1)  ' Get left word.

       print "LWord: ";  LWord

       RWord = Right(UsrInp, Len(UsrInp) - SpcPos)  ' Get right word.

       Msg = "The first word you entered is " & LWord

       Msg = Msg & "." & " The second word is "

       Msg = "The first word you entered is <" & LWord & ">"

       Msg = Msg & RWord & "."

   Else

       Msg = "You didn't enter two words."

   End If

   MsgBox Msg ' Display message.

End Sub