vb中的mid函数
i = InStr(strString, "来电号码:") + 16
Text3.Text = i
j = InStr(i, strString, "用户姓名:") - 19
Text2.Text = j
strName1 = Mid(strString, 8850,20)
Text4.Text = strName1
这个strString存放的长度总共是10000多个,不可以么?那该怎么办呢? 展开
Mid是Visual Basic和Microsoft Excel中的一个字符串函数,作用是从一个字符串中截取出指定数量的字符。
VB中
Mid(String As Variant, Start As Long, [Length As Variant]) As Variant
Mid$(String As String, Start As Long, [Length As Variant]) As String
Excel中
MID(text, start_num, num_chars)
说明:这个函数的3个参数各在VB和Excel中互相等价,但VB中的Length参数可以省略败册槐,而Excel中num_chars参数不可省略。
参数列表
Mid函数参数
说明:当Start(start_num)参数小于1时,函数返回一个错误;当Strat参数值大于String(text)参数长度时,返回一空字符串;若从Start参数起截取长度超出字符串末尾,或Length参数被省略,则返回Start参数位置到字符串结尾的所有字符。
VB中的Mid和Mid$两种写法在用法上没有区别。
要得到字符串的长度,可以使用Len函察友数。
VB和Excel中都有MidB函数,与Mid不同,它是以字节为单位进行字符串截取的,同时,可以用LenB函数得到字符串的字节数。
范例:下面的示例展示了VB中如何姿返使用Mid函数。其中所有的“Mid”都可以用“Mid$”代替。
Mid 函数脊山的语法具有下面的命名参数:
部分 说明
string 必要参数。字符串表达式,从中返回字符。如果 string 包含 Null,将返回 Null。
start 必要樱稿中参数。为 Long。string 中被取出部分的字符位置。如果 start 超过 string 的字符数,Mid 返回零长度字符串 ("")。
length 可选参数;为 Variant (Long)。要返回的字符数。如果省略或 length 超过文本的字符数(包括 start 处的字符),将返回字符串中从敬困 start 到尾端的所有字符。
long 型的当然可以。
Mid有3个参数,第一参数是要从哪个字符串中取
第二个参粗衡数是指从第几个开始取
第三个参数是指取几个
例如:Mid("aabbcc",3,2)就是指从"aabbcc"的第3个字符开始,取2个字符,因此返回值为"bb".
i,
n)就是从字符串abcde第
i
位开始取n个,比神键如好芦
x=mid(s,
3,
2)=cd,x=mid(s,2,
4)=bcde