VBA Access

Private Sub ItemID_Exit(Cancel As Integer)
'work out description
Select Case ItemInfoType
Case Forms![frmNewStock].ItemID = "WCJ*"
ItemDescription = "WheelChair - Junior"
Case Forms![frmNewStock].ItemID = "WCS*"
ItemDescription = "WheelChair - Small"
End Select

Can anybody see anything wrong with this? I want it so that when i type something such as WCJ 01, or WCS 01, it recognizes it and enters the item description. Currently what ever i type it just enters the item description as WheelChair - Junior.

ItemType = left$(Forms!frmNewStock.ItemID, 3)
select case ItemType
case "WCJ"
ItemDescription = "WheelChair - Junior"
case "WCS"
ItemDescription = "WheelChair - Small"
end select