$sString = 'Как убрать регистрозависимость в поиске с помощью StringRegExp Вася'
Dim $aNick[4] = [3, 'вася', 'ВАСЯ', 'ВАся']
For $i = 1 To $aNick[0]
ConsoleWrite(StringRegExp(StringLower($sString), StringLower($aNick[$i])) & @TAB & $aNick[$i] & @LF)
Next
;или так:
For $i = 1 To $aNick[0]
ConsoleWrite(StringInStr($sString, $aNick[$i]) & @TAB & $aNick[$i] & @LF)
Next