想实现从一个字符串的后面开始查找某个字符,并返回其位置,VB中有没有这种函数呀?
能告诉我吗?

解决方案 »

  1.   

    用Len + InStr  函数就行了。debug.print Len(Text1.Text) - InStr(1, Text1.Text, Text2.Text) + 1其中,Text1.text为接受搜索的字符串,Text2.text为要搜索的字符串。
      

  2.   

    InStrRev函数
          描述返回一个字符串在另一个字符串中出现的位置,从字符串的末尾算起。语法InstrRev(string1, string2[, start[, compare]])InstrRev函数语法有如下几部分:部分 描述 
    string1 必需的。要执行搜索的字符串表达式。 
    string2 必需的。要搜索的字符串表达式。 
    start 可选的。数值表达式,设置每次搜索的开始位置。如果忽略,则使用–1,它表示从上一个字符位置开始搜索。如果start包含 
    Null,则产生一个错误。
     
    compare 可选的。数字值,指出在判断子字符串时所使用的比较方法。如果忽略,则执行二进制比较。关于其值,请参阅“设置值”部分。 
    设置值compare参数值如下:常数 值 描述 
    vbUseCompareOption –1 用Option Compare语句的设置值来执行比较。 
    vbBinaryCompare  0 执行二进制比较。 
    vbTextCompare  1 执行文字比较。 
    vbDatabaseCompare  2 只用于Microsoft Access。基于您的数据库信息执行比较。 
    返回值InStrRev返回值如下:如果 InStrRev返回 
    string1长度为零。 0 
    string1为Null。 Null 
    string2长度为零 Start 
    string2为Null Null 
    string2没有找到。 0 
    string2在string1中找到。 找到匹配字符串的位置。 
    start > Len(string2) 0 
    说明请注意,InstrRev函数的语法和Instr函数的语法不相同。
      

  3.   

    InStrRev函数    返回一个字符串在另一个字符串中出现的位置,从字符串的末尾算起
    语法
    InstrRev(string1,string2[,start[,compare]])
    InstrRev函数语法有如下几部分:
    部分                  描述
    string1           必需的。要执行搜索的字符串表达式
    string2           必需的。要搜索的字符串表达式
    start             可选的。数值表达式,设置每次搜索的开始位置。如果忽略,则使用?,它表示从上一个字符位置开始搜索。如果start包含Null,则产生一个错误
    compare           可选的。数字值,指出在判断子字符串时所使用的比较方法。如果忽略,则执行二进制比较。关于其值,请参阅“设置值”部分。
    设置值
    compare 参数值如下:
    常数值描述
    VbUseCompareOption    -1    用OptionCompare语句的设置值来执行比较
    vbBinaryCompare       0      执行二进制比较
    vbTextCompare         1      执行文字比较
    vbDatabaseCompare     2     只用于MicrosoftAccess。基于您的数据库信息执行比较
    返回值
    InStrRev返回值如下:
    如果              InStrRev返回
    string1长度为零         0        
    string1为Null          Null
    string2长度为零        Start
    string2为Null          Null
    string2没有找到         0
    string2在string1中找到   找到匹配字符串的位置
    start>Len(string2)       0
    说明       请注意,InstrRev函数的语法和Instr函数的语法不相同。