Mid (Statement)
Overwrites a substring of a string with another
Declare Sub Mid ( ByRef text As String, ByVal start As Integer, ByVal length As Integer, ByRef expression As Const String )
Declare Sub Mid ( ByVal text As WString Ptr, ByVal start As Integer, ByVal length As Integer, ByVal expression As Const WString Ptr )
Mid( text, start ) = expression
text
Copies a maximum of length characters of expression into text, starting at start.
If length is not specified, all of expression is copied. The size of the string text is unchanged; if expression is too big, as much of it is copied up to the end of text.
Mid can also be used as a function to return part of another string. See Mid (Function).
Syntax
Declare Sub Mid ( ByRef text As String, ByVal start As Integer, ByVal length As Integer, ByRef expression As Const String )
Declare Sub Mid ( ByVal text As WString Ptr, ByVal start As Integer, ByVal length As Integer, ByVal expression As Const WString Ptr )
Usage
Mid( text, start ) = expression
Or
Mid( text, start, length ) = expressionParameters
text
The string to work with.
startThe start position in text of the substring to overwrite.
lengthThe number of characters to overwrite.
Description
Copies a maximum of length characters of expression into text, starting at start.
If length is not specified, all of expression is copied. The size of the string text is unchanged; if expression is too big, as much of it is copied up to the end of text.
Mid can also be used as a function to return part of another string. See Mid (Function).
Example
Dim text As String
text = "abc 123"
Print text 'displays "abc 123"
' replace part of text with another string
Mid(text, 5, 3) = "456"
Print text 'displays "abc 456"
text = "abc 123"
Print text 'displays "abc 123"
' replace part of text with another string
Mid(text, 5, 3) = "456"
Print text 'displays "abc 456"
Differences from QB
- None
See also
