instr函数

 instr函数在Oracle/PLSQL中是返回要截取的字符串在源字符串中的位置。instr是一个非常好用的字符串处理函数,几乎所有的字符串分隔都用到此函数。
 语法如下:instr( string1, string2, start_position,nth_appearance ),
 string1:源字符串,要在此字符串中查找。
 string2:要在string1中查找的字符串 。
 start_position:代表string1 的哪个位置开始查找。此参数可选,如果省略默认为1. 字符串索引从1开始。如果此参数为正,从左到右开始检索,如果此参数为负,从右到左检索,返回要查找的字符串在源字符串中的开始索引。
 nth_appearance:代表要查找第几次出现的string2. 此参数可选,如果省略,默认为 1.如果为负数系统会报错。
 注意:
  位置索引号从1开始。
  如果String2在String1中没有找到,instr函数返回0。
  示例:
  SELECT instr('syranmo','s') FROM dual; -- 返回 1
  SELECT instr('syranmo','ra') FROM dual; -- 返回 3
  SELECT instr('syran mo','a',1,2) FROM dual; -- 返回 0

   Substr(pmi01,1,Instr(pmi01,'-',1,1)-1)

### VBA 中 InStr 函数的用法及示例 #### 1. InStr 函数的基本语法 InStr 函数用于返回一个字符串在另一个字符串中首次出现的位置。其基本语法如下: ```vba InStr([start], string1, string2, [compare]) ``` - `start`:可选参数,指定搜索的起始位置。如果省略,则从第一个字符开始搜索[^4]。 - `string1`:必需参数,表示要在其中进行搜索的字符串。 - `string2`:必需参数,表示要搜索的子字符串。 - `compare`:可选参数,指定比较的方式。可以是以下常量之一: - `vbUseCompareOption`:使用 Option Compare 语句的设置执行比较。 - `vbBinaryCompare`:执行二进制比较(区分大小写)[^4]。 - `vbTextCompare`:执行文本比较(不区分大小写)。 #### 2. 示例代码 以下是一些关于 InStr 函数的示例: ##### 示例 1:简单查找 查找字符串 "VBA" 是否存在于单元格 A1 的值中,并返回其位置。 ```vba Dim position As Long position = InStr(1, Range("A1").Value, "VBA", vbTextCompare) If position > 0 Then MsgBox "找到 'VBA',位置为: " & position Else MsgBox "'VBA' 未找到" End If ``` ##### 示例 2:检查是否包含特定文本 判断某个单元格的值是否包含特定子字符串 "Excel"。 ```vba If InStr(1, Range("B1").Value, "Excel", vbTextCompare) > 0 Then MsgBox "包含 'Excel'" Else MsgBox "不包含 'Excel'" End If ``` ##### 示例 3:结合循环查找多个单元格 遍历一数据,查找包含特定文本 "VBA" 的单元格。 ```vba Dim i As Long For i = 1 To 10 If InStr(1, Cells(i, 1).Value, "VBA", vbTextCompare) > 0 Then Cells(i, 1).Interior.Color = RGB(255, 0, 0) ' 将包含 "VBA" 的单元格背景设为红色 End If Next i ``` ##### 示例 4:替换字符串中的特定部分 结合 InStr 和 Replace 函数实现字符串替换。 ```vba Dim originalString As String Dim replacedString As String originalString = "Hello VBA World" replacedString = Replace(originalString, "VBA", "Excel") MsgBox "原始字符串: " & originalString & vbCrLf & "替换后的字符串: " & replacedString ``` #### 3. 返回值说明 InStr 函数的返回值取决于输入参数的情况: - 如果 `string1` 是零长度字符串,则返回值为 0[^4]。 - 如果 `string2` 是零长度字符串,则返回值等于 `start` 参数的值[^4]。 - 如果未找到 `string2`,则返回值为 0。 - 如果找到 `string2`,则返回值为匹配的第一个字符的位置(从 1 开始计数)[^4]。 #### 4. 注意事项 - 如果需要从右到左查找字符串,可以使用 `InStrRev` 函数[^3]。 - 在使用 InStr 函数时,建议明确指定 `compare` 参数以避免因默认比较方式导致的意外结果[^4]。
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值