Property ctlTipovent_SelectedCodvent() As Decimal
Get
'Return TipoVent1.DataKeys(TipoVent1.SelectedItem.ItemIndex)
Return Session("codvent")
End Get
Set(ByVal Value As Decimal)
Value = Session("codvent")
'Value =TipoVent1.DataKeys(TipoVent1.SelectedItem.ItemIndex)
TipoVent1.SelectedIndex = Value
End Set
End Property