Mid （语句）
用另一个字符串覆盖一个字符串的子字符串
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
从start 开始，text 的expression 字符最多可以复制到text .
如果未指定length ，则expression 将全部复制。字符串text 的大小不变;如果expression 太大，那么很多都会复制到text 结尾。
Mid也可以用作返回另一个字符串的一部分的函数。见中（功能）.
语法
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
Or
Mid( text , start , length ) = expression 参数
text
要使用的字符串。
start 要覆盖的子字符串的text 中的起始位置。第一个字符从位置1开始。
length 要覆盖的字符数。
说明
从start 开始，text 的expression 字符最多可以复制到text .
如果未指定length ，则expression 将全部复制。字符串text 的大小不变;如果expression 太大，那么很多都会复制到text 结尾。
Mid也可以用作返回另一个字符串的一部分的函数。见中（功能）.
例子
Dim text As String
text = "abc 123"
Print text '显示“abc 123”
'用另一个字符串替换文本的一部分
Mid(text, 5, 3) = "456"
Print text '显示“abc 456”
text = "abc 123"
Print text '显示“abc 123”
'用另一个字符串替换文本的一部分
Mid(text, 5, 3) = "456"
Print text '显示“abc 456”
与QB差别
- 没有
参考