/* Umfrage, welche LV die Beste ist */
.bsf.dialog~messageBox("Es folgt nun eine Umfrage, welche Lv die Beste ist:", "UMFRAGE")

res1=.bsf.dialog~dialogBox("Möchtest Du an der Umfarge teilnehmen?", , "question",  "YesNo")

if res1 == 1 then close() end

txtoptions=.list~of("Business Programming 1", "Business Programming 2", "Business Programming")
defaultTxtOption="Business Programming"
res2=.bsf.dialog~inputBox("Wähle bitte die passende LV aus!", "Choice Dialog", "plain", , txtOptions, defaultTxtOption)

if res2 == .NIL then close() end

.bsf.dialog~messageBox("Und die beste LV ist "res2" !!!", "GEWINNER", "error")

::requires BSF.CLS