ido-completing-read minimun example
(defun my-test-elisp () (interactive) (let (start end) (save-excursion (backward-sentence) (setq start (point)) (forward-sentence) (setq end (point)) (setf (buffer-substring start end) (ido-completing-read "select Ctr-s:" (list (buffer-substring-no-properties start end) "aaaaaa" "bbbb" "cc c cc"))))))
M-x my-test-elisp