try this

Code:
Dim myEnum as Company.NameSpace.Assembly.DataTypes = DirectCast([Enum].Parse(GetType(Company.NameSpace.Assembly.DataTypes), "String"), Company.NameSpace.Assembly.DataTypes)