codice:
Option Strict On
Imports l = libreria.ModuloWeb
Public Enum enumTipoFile
doc = 1
pdf = 2
txt = 3
generico = 4
End Enum
Partial Class prove_a
Inherits System.Web.UI.Page
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
'conosco il valore numerico sottostante
prova(DirectCast(3, enumTipoFile))
'conosco la rappresentazione testuale
prova(DirectCast([Enum].Parse(GetType(enumTipoFile), "txt"), enumTipoFile))
End Sub
Private Sub prova(ByVal tipoFile As enumTipoFile)
Response.Write(tipoFile & ", " & tipoFile.ToString & "
")
End Sub
End Class
io lo salverei nel database come integer.
L'unica cosa è che non hai messo il tipo generico uguale a zero (lo zero è il primo valore, quello predefinito)