how do vb6 like "*.*?
maybe it's error
maybe it's error
B4X:
Sub MatchWildcard(text As String, pattern As String) As Boolean
Dim regexPattern As String = pattern
regexPattern = regexPattern.Replace(".",".")
regexPattern = regexPattern.Replace("*", ".*") '
regexPattern = regexPattern.Replace("?", ".")
regexPattern = "^" & regexPattern & "$"
Dim m As Matcher
m = Regex.Matcher(regexPattern, text)
Return m.Find
End Sub