vb一个字符串在另一个字符串中第二次出现的位置?

Posted

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了vb一个字符串在另一个字符串中第二次出现的位置?相关的知识,希望对你有一定的参考价值。

vb中,求一个字符串在另一个字符串中第二次出现的位置,用什么函数?不是求最后一次出现位置,也不是第一次出现位置。
Instr and InstrRev函数都似乎无法满足要求。
自己写个判断当然可以,我不记得了不知道有没有其它的字符串处理函数。

Private Sub Command1_Click()
a = "SET DC VSOURCE/49V/12A"
b = InStr(1, a, "V") '第一个出现/的位置。
c = InStr(b + 1, a, "V") '第二个出现/的位置。
End Sub
参考技术A Dim nPos As Long, strSource As String, strFind As String

strSource = "ABCDABCE"
strFind = "AB"

nPos = InStr(1, strSource, strFind)
If nPos > 0 Then
nPos = InStr(nPos + Len(strFind), strSource, strFind)
End If
Print "第二次出现位置是:" & nPos本回答被提问者和网友采纳
参考技术B 添加两个文本框text1和text2,一个命令按钮
text1在text2中出现的位置如下
Private Sub Command1_Click()
Dim a As Integer
a = InStr(InStr(1, Text2.Text, Text1.Text) + 1, Text2.Text, Text1.Text)
If a > 0 Then
MsgBox Text1.Text & "第二次出现的位置为" & a
End If
End Sub
参考技术C 自己写个判断不就完了。
假设要在string1里边找string2的值
dim i as integer
i = Instr(string1,string2)
if i > 0 then
i = Instr(i + Len(string2), string 1, string2)
end if
参考技术D instr找出第一个,再以结果为start再次使用instr

如何检测文本文件中第二次出现空行?

【中文标题】如何检测文本文件中第二次出现空行?【英文标题】:How to detect second occurrence of an empty line in a text file? 【发布时间】:2020-02-04 15:52:45 【问题描述】:

我有一个文本文件,其中空行很少,但不是连续的。我必须检测文本文件中第二个出现的空行。文件内容如下:

item1

item2

item3
item4
item5
item6

item7

我想检测第二个空行以从item3 读取数据。请帮我写代码。

【问题讨论】:

我们应该帮助您的代码在哪里? foreach ($arr as $value) if ('' === trim($value)) $empty1 = $value ; 使用它来检测第一个空行 所以增加一个简单的计数器,每次遇到一个空行时……检查那个计数器的值,当它达到两个时,做任何你需要做的事情。 【参考方案1】:

假设 $arr 是文件的行...

$emptyLinesSkipped = 0;
foreach ($arr as $value) 
  if ('' === trim($value)) 
    if ($emptyLinesSkipped < 2) 
      $emptyLinesSkipped = $emptyLinesSkipped + 1;
      continue;
    

    $item3 = $value;
    // and so on...
  

【讨论】:

以上是关于vb一个字符串在另一个字符串中第二次出现的位置?的主要内容,如果未能解决你的问题,请参考以下文章

第二次作业

sed / awk 匹配文件中第二次出现的正则表达式,并替换整行

c语言中如何在一个字符串中查找/出现的位置?需要第一次出现和第二次出现中间的内容和第二次出现和第三

在Java中的字符串中查找第二次出现的子字符串

用于在 javascript 中查找动态字符串中字符的第二次出现的正则表达式

如何检测文本文件中第二次出现空行?