Question

vb中的mid函数

请问在vb中我写程序用于字符串提取，用到了strName1 = Mid(strString, 8850,20)函数，但当我将8850和20这两个位置的值换为两个Long类型的变量时就抱错，说strName1 = Mid(strString, 8850,20)是错误的过程调用或函数，并且看到所有的strString(它是存放被查找字符串的字符串变量)都为空，而且i和j分别等于16和-19，并不是真实值，这是为什么呢？我很着急，谢谢啦！

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多个，不可以么？那该怎么办呢？

Answer 1

　　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$”代替。

　　　　

Answer 2

Mid(string, start[, length])

Mid 函数的语法具有下面的命名参数：

部分 说明
string 必要参数。字符串表达式，从中返回字符。如果 string 包含 Null，将返回 Null。
start 必要参数。为 Long。string 中被取出部分的字符位置。如果 start 超过 string 的字符数，Mid 返回零长度字符串 ("")。
length 可选参数；为 Variant (Long)。要返回的字符数。如果省略或 length 超过文本的字符数（包括 start 处的字符），将返回字符串中从 start 到尾端的所有字符。

long 型的当然可以。

Answer 3

Mid就是从一个字符串中取子字符串，比如a="aabbcc",我们想取出"bb"就可以用Mid("aabbcc",3,2)
Mid有3个参数，第一参数是要从哪个字符串中取
第二个参数是指从第几个开始取
第三个参数是指取几个
例如：Mid("aabbcc",3,2)就是指从"aabbcc"的第3个字符开始，取2个字符，因此返回值为"bb".

Answer 4

举例说明：比如s="abcde"，那么x=mid(s,
i,
n)就是从字符串abcde第
i
位开始取n个，比如
x=mid(s,
3,
2)=cd，x=mid(s,2,
4)=bcde

Answer 5

一个字符串的最大长度是255,怎么可能是8850。。。。