VB.net primary entry example