(?:b|^)abc

Sub test()
    Set re = CreateObject("VBScript.RegExp")
    re.Pattern = "babc"
    MsgBox re.test("abc")
    re.Pattern = "^abc"
    MsgBox re.test("abc")
    re.Pattern = "(?:b|^)abc"
    MsgBox re.test("abc")
End Sub