Value followed by any number

[Niel HS]

Hello,
I need some help to complete my below code.

Private Sub SerialNumber_AfterUpdate()
 
If Not (Combo29.Value = "965-1595-000" And SerialNumber.Value = Left("EMK5-", 5)) Then
MsgBox "The Serial Number Must Start With Prefix: EMK5- then followed by any number!", vbCritical, "Redmond and Dixie Product Only"
Cancel = True
SerialNumber.Value = Null
End If
 
End Sub

I want Value on SerialNumber must be start with prefix EMK5- and followed by any number. In the Code on SerialNumber.Value = Left("EMK5-", 5) need to add some code to completed. Anybody can help on this

Thanks a lot !
Niel