Mid Function, Mid Statement

აბრუნებს სტრინგული გამოსახულების მითითებულ ნაწილს (Mid ფუნქცია), ან ერთი სტრინგული გამოსახულების ნაწილს ჩაანაცვლებს მეორით (Mid განცხადება).

Syntax:


Mid (Text As String, Start As Long [, Length As Long]) or Mid (Text As String, Start As Long , Length As Long, Text As String)

Return value:

სტრინგი (მხოლოდ ფუნქციით)

Parameters:

ტექსტი: თქვენთვის რედაქტირებისთვის სასურველი ნებისმიერი ტექსტური გამოსახულება.

Start: Numeric expression that indicates the character position within the string where the string portion that you want to replace or to return begins. The minimum allowed value is 1. The maximum allowed value is 2,147,483,648.

Length: Numeric expression that returns the number of characters that you want to replace or return. The maximum allowed value is 2,147,483,648.

თუ სიგრძის პარამეტრი Mid ფუნქციაში გამოტოვებულია, სტრინგის გამოსახულებაში ყველა ასო-ნიშანი დაბრუნდება საწყისიდან საბოლოო პოზიციამდე.

თუ სიგრძის პარამეტრი Mid დებულებაში ნაკლებია ჩასანაცვლებელი ტექსტის სიგრძეზე, ტექსტი შემცირდება მითითებულ სიგრძემდე.

ტექსტი: სტრინგული გამოსახულების ჩასანაცვლებელი სტრინგი.(Mid დებულება).

Error codes:

D'oh! You found a bug (text/sbasic/shared/00000003.xhp#err5 not found).

Example:


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

String functions