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

替换VBA字符串中的字符

我想知道是否可以替换字符串中的字符。例如,在以下字符串中:
"d:\Program files\Folder 1\Sub folder 2";我想替换字符“\&引用;带“\\&quot,结果:
"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

我使用REPLACEReplace(expression, find, replace[, start[, count[, compare]]]) 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

使用replaceDim 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


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

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

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

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


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

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

谢谢大家。它'这会很有帮助。

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

C:\test\\Stuff呢。dwg作为字符串(StrText,可选可选可选可选字符串作为字符串)Dim StrFind作为字符串;然后为0 StrFind=交替字符串 StrFind=&quot\&引用
如果StrDoublure=StrFind&结束;StrFind&lt&燃气轮机;Len(StrText) RemovePetitives睫毛=StrText StrText=替换(StrText,“\\”,“\\”
循环结束函数
页: [1]
查看完整版本: 替换VBA字符串中的字符