Forse bastava

Me.CBB.SelectedValue = Convert.ToString(TipoDoc.Preventivo)