Dim data = { New With { Key .StateName = "Alabama", Key .Abbreviation = "AL" }, New With { Key .StateName = "Alaska", Key .Abbreviation = "AK" }, New With { Key .StateName = "American Samoa", Key .Abbreviation = "AS" }, New With { Key .StateName = "Arizona", Key .Abbreviation = "AZ" }, New With { Key .StateName = "Arkansas", Key .Abbreviation = "AR" } }