I am not familiar with Regex but searching a bit I came up with this
B4X:
Sub find_expression(text As String)
Dim matchr As Matcher=Regex.Matcher("\bbk[0-9]{1,3}\b",text )
Do While matchr.Find
Dim result As String =matchr.Match
Log(result.SubString(2))
Loop
End Sub