0

Eric Corni<br>chargé de clientèle<br>Tél: 09 99 99 99 99 72<br> atricard@adiscos.com手に入れたい一文しかないchargé de clientèle<br>Tél: 09 99 99 99 99 72<br> atricard@adiscos.com

私は以下のようなコードを持っています:

strText = Replace(strText, "_com_position_", Right(com_signature,InStrRev(com_signature, ">", len(com_signature))+3))

しかし、それは私_com_position_ = "Eric Corni<br>chargé de clientèle<br>Tél: 09 99 99 99 99 72<br> atricard@adiscos.com"が必要としているものと間違って表示されます.次のように表示されます:gé de clientèle<br>Tél: 09 99 99 99 99 72<br> atricard@adiscos.com

解決策はありますか、修正するのを手伝ってください、ありがとう。

4

3 に答える 3

0

考えられる解決策の 1 つ ( を使用) は、文字列の最初の部分を正規表現で削除することです。

strText = "Eric Corni<br>chargé de ..."

Set re = New RegExp
re.Pattern = "^.*?<br>"
re.IgnoreCase = True

WScript.Echo re.Replace(strText, "")
于 2013-05-20T10:53:49.790 に答える
0

これを試して：

strText = strText.SubString(strText.IndexOf("<br>") + 4)
于 2013-05-20T07:28:59.710 に答える
0

instr function() を使用し、長さ<br>が 4 であることがわかっている場合

Dim strText As String = "Eric Corni<br>chargé de clientèle<br>Tél: 09 99 99 99 99 72<br>    atricard@adiscos.com"

strText = Mid(strText,InStr(strText, "<br>") + 4)
于 2013-05-20T04:25:52.427 に答える