Funkcja Right
Zwraca "n" znaków ciągu (licząc od prawej strony).
Zobacz także: Funkcja Left.
Składnia:
Right (tekst As String, n As Long)
Zwracana wartość:
Ciąg
Parametry:
Tekst: Dowolny ciąg, z którego należy zwrócić znaki począwszy od prawej strony.
n: Wyrażenie numeryczne określające liczbę znaków, które należy zwrócić. Jeśli n = 0, zwracany jest ciąg o długości zerowej. Maksymalna dozwolona wartość wynosi 65535.
Poniższy przykład przekształca datę z formatu RRRR-MM-DD na format używany w USA (MM/DD/RRRR).
Przykład:
Sub ExampleUSDate
Dim sInput As String
Dim sUS_date As String
sInput = InputBox("Wprowadź datę w formacie międzynarodowym 'RRRR-MM-DD'")
sUS_date = Mid(sInput, 6, 2)
sUS_date = sUS_date & "/"
sUS_date = sUS_date & Right(sInput, 2)
sUS_date = sUS_date & "/"
sUS_date = sUS_date & Left(sInput, 4)
MsgBox sUS_date
End Sub