在以下代码中,我尝试处理复选框上的单击事件。我希望在 javascript 控制台中看到“hello”这个词,但我什么也没看到。如何修改代码以执行打印语句?
let checkGroupByRounds = Dom_html.createInput ~_type:(Js.string "checkbox") doc in
Lwt_js_events.clicks checkGroupByRounds (fun event event_loop ->
Lwt.return (Printf.printf "hello"));
Dom.appendChild container checkGroupByRounds;