a better way would be to use a Case statement
I'm assuming "dev", "admin", "sprvsr" are string values, not variables, if the latter then remove the double quotes
Select Case strSecLvl
Case "dev", "admin", "sprvsr"
If MsgBox("Do you wish to clear the logs?", vbYesNo, "Clear Logs")...