Visual Basci中的几个函数split(),ubound(),lbound(),instr(

作者:网络 来源:佚名 更新时间:2008-11-15 10:50:30 点击:
1.split(包含子字符串和分隔符的字符串表达式 ,[分隔符],[要返回的子字符串数],[数字值表示判别子字符串时使用的比较方式]),[]部分为可选部分。该函数返回一个以零为下标的一维数组,它包含指定数目的子字符串。
    例:
    dim xx as variant
    xx=split("hello world"," ")'将hello world 分隔为hello和world 
    text1.text= xx(0) '返回hello
    text2.text=xx(1) '返回world
2.ubound(数组名),该函数返回一个 long 型数据,其值为指定的数组维可用的最大下标
   lbound(数组名),返回一个 long 型数据,其值为指定数组维可用的最小下标。
    例:
    dim xx as variant
    xx=split("hello world"," ")
    text1.text=ubound(xx)  '返回1
    text2.text=lbound(xx)  ‘返回0
3.instr([start, ]string1, string2),该函数返回 variant (long),指定一字符串(string2)在另一字符串中(string1)最先出现的位置,如果没有找到返回0。[start,]为可选参数,表示搜索的开始位置。
    例:
    dim xx as string
    xx="hello world"
    text1.text=instr(xx,"o") '返回5
    text2.text=instr(6,xx,"o") '返回8,从第6个字符开始查找
4.mid(string, start[, length]),返回variant (string),其中包含字符串(string)中指定长度[,length]的字符,start为开始位置。其中的[,length]为可选参数不指定长度,则返回start后的所有字符。
      例:
      dim xx  as sting
      xx="hello world"
      text1.text=mid(xx,1,5)'返回hello
      text2.text=mid(xx,1)  '返回hello world