質問: removemenu(lngmenuhwnd, sc_close, mf_bycommand)
回答: 例:何かをした とは、optionbuttonにチェックを入れたとかです。 実際は、optionbuttonにチェックを入れたなら mysw=true とかにします。 private sub userform_queryclose(cancel as integer, closemode as integer) if 何かをした=true then 'public 何かをした as boolean で、定義すること cancel = true else '何もしない cancel = false end if end sub