im useing this code right now

If i.Contains("1") Then
MsgBox("2")
Else
End If

but what i want to do it have it check multiple text like this

If i.Contains("1") or ("2") or ("3")Then
MsgBox("H2")
Else
End If

but that doesnt work anyone want to help