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. The first character starts at position 1.
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