vb中的mid函数,vb mid函数的用法

网友回答

Mid是Visual Basic和Microsoft Excel中的一个字符串函数，作用是从一个字符串中截取出指定数量的字符。这个函数的3个参数各在VB和Excel中互相等价，但VB中的Length参数可以省略，而Excel中num_chars参数不可省略。
　　当Start（start_num）参数小于1时，函数返回一个错误；当Start参数值大于String（text）参数长度时，返回一空字符串；若从Start参数起截取长度超出字符串末尾，或Length参数被省略，则返回Start参数位置到字符串结尾的所有字符。
　　VB语法：
　　1、Mid(String As Variant, Start As Long, [Length As Variant]) As Variant
　　2、Mid$(String As String, Start As Long, [Length As Variant]) As String
　　扩展资料：
　　一、说明：
　　VB中的Mid和Mid$两种写法在用法上没有区别。
　　要得到字符串的长度，可以使用Len函数。
　　VB和Excel中都有MidB函数，与Mid不同，它是以字节为单位进行字符串截取的，同时，可以用LenB函数得到字符串的字节数。
　　二、对语法的理解就是：
　　返回string中从start开始的后面的length长度的字符串
　　string是必需的参数，如果string包含Null，返回结果也将是Null。
　　start必需的参数，string中被取出部分的字符位置。需要注意的是如果start超过了string的字符数，Mid 返回零长度字符串 ("")。
　　length是可选参数，表示要返回的字符数，如果省略或length超过文本的字符数（包括start处的字符），将返回中从start到末尾的所有字符。
　　参考资料：
　　百度百科-MID函数

网友回答

说实话,我怀疑你代码表达的意思不对,先说明你的主要错误
　　mid出来的值是字符窜,你的if mid(text1.text,k,1)=a then 中的a要加上引号,才是字符啊``
　　并且else好像要另起一行写才对吧
　　然后根据你的代码意思label1(k)猜测你有4个label1控件数组,但是后面
　　label(k).backcolor=vbwhite是什么意思???少写了个1还是你原本的题意思是改变label1中间"a"的颜色??
　　如果你原来的题意只是改变label1(k)的背景颜色,那么再加上个1吧