mid函数的使用

[Gosoft]

如下是我的代码：
for i=1 to k
textval=mid(mytext,(i-1)*m,20);
next
为什么在运行的时候总是出错呢？

[beckheng]

字符串: str="hello"
对 应 数值 ：12345
循环开始的时候就由0开始取字符，应该错！

[Gosoft]

从零开始我是知道的，
如果把(i-1)*10换成i那么就没有错。
我不需要取第一个字符。
这是为什么

[beckheng]

真是像你所说的啊。不过你不需要取第一个字符，你的循环改改不就行了？
加句ON ERROR RESUME NEXT就会看到效果了。

[wybm]

语法
Mid(string, start[, length])
Mid 函数的语法有以下参数：

参数 描述
string 字符串表达式，从中返回字符。如果 string 包含 Null，则返回 Null。
start string 中被提取的字符部分的开始位置。如果 start 超过了 string 中字符的数目，Mid 将返回零长度字符串 ("")。
length 要返回的字符数。如果省略或 length 超过文本的字符数（包括 start 处的字符），将返回字符串中从 start 到字符串结束的所有字符。
Mid 函数示例
本示例使用 Mid 语句来得到某个字符串中的几个字符。

Dim MyString, FirstWord, LastWord, MidWords
MyString = "Mid Function Demo" 建立一个字符串。
FirstWord = Mid(MyString, 1, 3) ' 返回 "Mid"。
LastWord = Mid(MyString, 14, 4) ' 返回 "Demo"。
MidWords = Mid(MyString, 5) ' 返回 "Funcion Demo"。

[wilddragon]

up

[Gosoft]

其实mid函数的功能我是知道的。
但是我在函数中引用某些变量的时候，就会出错。

[cqing]

mid的开始位置不能为0，你用（i-1）*m的时候，当i=1时（i-1）*m 为0。你用i的时候，i为1到k，不会为0，所以把(i-1)*10换成i就没有错。

[balloy]

Mid 函数中， 起始位置应为1，不是0，这和Javascript不大像。
wybm()的例子不是已经说得很清楚了吗？

Dim MyString, FirstWord, LastWord, MidWords
MyString = "Mid Function Demo" 建立一个字符串。
FirstWord = Mid(MyString, 1, 3) ' 返回 "Mid"。
LastWord = Mid(MyString, 14, 4) ' 返回 "Demo"。
MidWords = Mid(MyString, 5) ' 返回 "Funcion Demo"。