主页 / coding / 问题 / 79248181
Accepted
Rob Myre
Asked: 2024-12-03 23:19:51 +0800 CST

VBA 替换“开始”属性删除文本

  • 772

这很奇怪。我试图用Replace函数替换第二个出现的值。这就是我得到的。

Sub_string = Replace(sub_string, "<ul>", "", ulnestfound, 1, vbTextCompare)

我的想法是，该Replace函数将开始查看位置ulnestfound，并从该点替换第一次出现的"<ul>"。实际发生的是，将删除之前的所有文本ulnestfound以及<ul>标签。因此，例如，如果ulnestfound = 100，将删除前 100 个字符sub_string，然后进行替换。

知道为什么会发生这种情况吗？这让我很抓狂。

我尝试手动输入起始值，然后我才意识到发生了什么。我无法想象它为什么会删除这样的文本。

vba

1 个回答

  1. Best Answer

    Replace 函数的文档说明如下：

    返回一个字符串，它是从起始位置（默认为 1）开始的字符串表达式的子字符串，其中指定的子字符串已被另一个子字符串替换指定的次数。

    我同意这不是大多数开发人员所认为的，但它与观察到的行为一致。

    你可以这样写：

    Sub_string = Left(sub_string, ulnestfound - 1) & _
    Replace(sub_string, "<ul>", "", ulnestfound, 1,, vbTextCompare)

    请注意语法是

    Replace(expression, find, replace, [ start, [ count, [ compare ]]])

    你省略了count参数。要么写

    Sub_string = Replace(sub_string, "<ul>", "", ulnestfound, 1,, vbTextCompare)

    或者

    Sub_string = Replace(sub_string, "<ul>", "", ulnestfound, 1, Compare:=vbTextCompare)

    否则vbTextCompare(=1) 将被视为count。

    • 2

相关问题