目录
索引 🔎︎

# Mid 函数, Mid 语句

返回字符串表达式的指定部分 (Mid 函数)，或将字符串表达式的指定部分替换成另一个字符串 (Mid 语句)。

## 语法:

    Mid (Text As String, Start As Integer [, Length As Integer]) 或 Mid (Text As String, Start As Integer , Length As Integer, Text As String)

## 返回值:

字符串 (仅适用于函数)

## 参数:

「Text」:要修改的任意字符串表达式。

「Start」: 数字表达式，表示要替换或返回的字符串部分在字符串中的起始字符位置。允许的最大值是 65535。

「Length」:返回要替换或要返回的字符数目的数字表达式。允许的最大值是 65535。

如果不指定「Mid 函数」中的 Length 参数，则返回字符串表达式中从开始位置到字符串结尾的所有字符。

如果「Mid 语句」中的 Length 参数小于要替换的文字长度，文字将缩短到指定的长度。

「Text: 用于替换字符串表达式的字符串 (Mid 语句」)。

## 错误代码:

5 无效的过程调用

## 示例:

    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