The getString method expects an ordinal number as it's parameter, not a string. Do this instead:
reader = command.ExecuteReader
Dim columnID As Integer = reader.GetOrdinal("FileName")
While reader.Read
Dim sName = reader.GetString(columnID)
RecipieForm.ComboBoxRec.Items.Add(sName)
End While