После связывания. Вы можете спокойно сделать это:
cb.Items.Insert(0,"ALL")
Понравилось сказано в комментарии. Сделайте это:
Private Sub fview_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Timer1.Enabled = True
Timer1.Interval = 1000
cenNum.DropDownStyle = ComboBoxStyle.DropDownList
cenNum.Items.Insert(0, "All") 'adding all to combo
fData() 'function populating the combo from database
cenNum.SelectedIndex=0 'The new line
end sub