Right Function

აბრუნებს სტინგ გამოსახულების "n" მარჯვენა უკიდურეს ასო-ნიშნებს.

აგრეთვე ნახეთ: მარცხენა ფუნქცია.

სინტაქსი

მარჯვენა (Text As String, n As Long)

დაბრუნებული მნიშვნელობა:

სტრიქონები

Parameters:

ტექსტი: ნებისმიერი სტრინგული გამოსახულება, რომლიც ყველაზე მარჯვენა ასო-ნიშნების დაბრუნებაც გსურთ.

n: რიცხვით გამოსახულება, რომელიც განსაზღვრავს ასო-ნიშნების რაოდენობას, რომელთა დაბრუნებაც გსურთ. . თუ n = 0, დაბრუნნდება ნულოვანი სიგრძის სტრინგი. მაქსიმუმი დასაშვები მნიშვნელობა არის 65535.

შემდეგ მაგალითს გადაყავს წწწწ-თთ-დდ ფორმატი ამერიკულ თარიღის ფორმატში (თთ/დდ/წწწწ).

მაგალითი:

Sub ExampleUSDate

Dim sInput As String

Dim sUS_date As String

    sInput = InputBox("Please input a date in the international format 'YYYY-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