替换VBA字符串中的字符

Keith · 发表于 2007-8-27 14:19:32

我想知道是否可以替换字符串中的字符。例如，在以下字符串中：

"d:\Program files\Folder 1\Sub folder 2"

；我想替换字符“\&引用；带“\\&quot，结果：

copy

"d:\\Program files\\Folder 1\\Sub folder 2"

有可能吗
我想这样做是为了将VBA确定的一些路径转换为Lisp能够理解的路径（它使用\\而不是\）。

Keith · 发表于 2007-8-27 14:25:25

是的，使用Instr（）查找，将其添加到找到的位置

Maverick® · 发表于 2007-8-27 14:35:43

我使用REPLACE

copy

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

copy

Public Sub Main()
    Dim strNewString As String
    
    strNewString = Replace("d:\\Program files\\Folder 1\\Sub folder 2", "\", "", 1)
    MsgBox strNewString
End Sub

Keith · 发表于 2007-8-27 14:41:18

使用replace

copy

Dim Path as String
Dim NewPath As String
Path = "d:\Program files\Folder 1\Sub folder 2"
NewPath = Replace (Path, "", "\")

NewPath将等于；d： \\程序文件\\文件夹1\\子文件夹2“
该死…马特揍了我一拳…

Maverick® · 发表于 2007-8-27 14:42:01

呜呼！！

Maverick® · 发表于 2007-8-27 14:42:45

呜呼
我需要学习打字更快…&lt；编辑*显然我需要更加关注我在做什么&gt；

Keith · 发表于 2007-8-27 15:01:26

我知道有一个更简单的方法，我就是不能#039；我记不起来了

Keith · 发表于 2007-8-27 17:50:29

呜呼
我需要学习打字更快…&lt；编辑*显然我需要更加关注我在做什么&gt
不，他只是比你长得更多&nbsp；

Maverick® · 发表于 2007-8-27 18:27:46

谢谢大家。它&#039；这会很有帮助。

Maverick® · 发表于 2007-8-30 10:22:33

C:\test\\Stuff呢。dwg作为字符串（StrText，可选可选可选可选字符串作为字符串）Dim StrFind作为字符串；然后为0&nbsp；StrFind=交替字符串&nbsp；StrFind=&quot\&引用
如果StrDoublure=StrFind&amp；结束；StrFind&lt&燃气轮机；Len（StrText）&nbsp；RemovePetitives睫毛=StrText&nbsp；StrText=替换（StrText，“\\”，“\\”
循环结束函数

替换VBA字符串中的字符

发表回复

精选推荐