Perdón creo que es así
en vez de esto   
Código vb:
Ver original- Dim Combo As DataGridViewComboBox = dgvsalud.Columns(dgvsalud.CurrentCell.ColumnIndex) 
pon esto   
Código vb:
Ver original- Dim Combo As DataGridViewComboBoxColumn = TryCast(dgvsalud.Columns(dgvsalud.CurrentCell.ColumnIndex),DataGridViewComboBoxColumn)