Module
Contents
Index 🔎︎

# Mid Function, Mid Statement

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

## სინტაქსი

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

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

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

## Parameters:

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

სტარტი: რიცხვითი გამოსახულება რომელიც აღნიშნავს ასო-ნიშნის მდებარეობას სტრინგში. სადაც სტინგის თქვენთვის ჩანაცვლებისთვის ან დაბრუნებისთვის სასურველი პორცია იწყება. მაქსიმალური დასაშვები მნიშვნელობაა 65535.

სიგრძე: რიცხვითი გამოსახულება რომელიც აბრუნებს იმ ასო-ნიშნის რაიდებიბას, რომლის ჩანაცვლება ან დაბრუნება გსურთ. მაქსიმალური დასაშვები მნიშვნელობაა 65535.

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

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

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

## Error codes:

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

## მაგალითი:

    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