(custom-set-variables)
(custom-set-faces
 '(buffers-tab ((t (:foreground "red" :background "black" :italic t :underline t))) t))

(progn
  (dolist (buf (quote ("1" "2" "3" "4")))
    (get-buffer-create buf))
  (switch-to-buffer "1"))