Regex VB6正则表达式替换

它确实可以工作，但只替换1个字符。如何替换多个字符。例如：“ÉPÉ”应该是“P”，但目前的结果是：“ÉPÉ”

您只需要启用全局模式匹配

Dim strPattern As String: strPattern = "[^a-zA-Z0-9]*" 
Dim regex As New RegExp
regex.Pattern = strPattern
result = regex.Replace(pFileNameWithoutExtension, "_")

---

@戈登：它只匹配一个不在列表中的0个或更多字符的字符串，它在列表中的第一个字符处终止。

Dim strPattern As String: strPattern = "[^a-zA-Z0-9]*" 
Dim regex As New RegExp
regex.Pattern = strPattern
result = regex.Replace(pFileNameWithoutExtension, "_")

Dim strPattern As String: strPattern = "[^a-zA-Z0-9]" 
Dim regex As New RegExp

regex.Global = True

regex.Pattern = strPattern
result = regex.Replace(pFileNameWithoutExtension, "_")